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MOVING CHEQUER BOARD 


EDITORIAL 


THIS MONTH'S MAGAZINE 

This month we publish two excellent games, KILLER DICE and BLOCK BLITZ. We 
believe that they compare well with commercially available games despite being 
written entirely in Basic. If you enjoy games, then you will find the time spent 
entering these two programs into your Electron, well worth while. 


Starting this month is a new series which will look at the problems likely to be 
encountered when trying to convert programs from the BBC micro to run on the 
Electron. Several letters have already been received from ELBUG readers seeking 
advice on this topic, and with so much BBC Micro software already around this is a 
potentially fruitful source of programs for the Electron. 


We have also compiled a list for this issue of all the currently available 
commercial software for the Electron. As the quantity of software for the Electron 
is likely to grow rapidly we do not intend to maintain this as a regular feature of 
the magazine. 


POSTBAG 

We have been pleased to receive growing numbers of letters from ELBUG members and 
again some of these are printed in the Postbag section of the magazine. We do like 
to hear from you, and your comments and opinions on the magazine and the Electron 
are always welcome. We will also try to answer technical queries that you may have 
about the use of the Electron, but please enclose an SAE with your letter. 


Mike Williams 


TICE BOARD NOTICE BOARD NOTICE BOARD NOTICE BOAR 


ADD-ONS FOR THE ELECTRON 

We have just received our review sample of the SIR expansion board add-on for the 
Electron. Quick tests with a few of the ROMs currently available for the BBC Micro 
(View, BCPL, Toolkit, Exmon and GROM) were promising, but some ROMs will need to be 
re-written before they work correctly on the Electron. We will be publishing a full 
review in a later issue of ELBUG. 


3D ROTATION 

In the production of the January/February issue of ELBUG, the very last part of 
this program (the procedure PROCshift) got lost and is reprinted in full below. 
Despite this, the main rotation and zoom features of the program should have worked 
with no problems at all. 


2236 DEF PROCshift 

2240 REM MOVE CUBE UP/DOWN/LEFT/RIGHT 

2258 hor$=hor$+hmove’ 

2266 vertS=vert$+vmoves 

2278 VDU 29,hor%;vert3; 

2286 ENDPROC & 
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ELECTRON ADD-ONS — THE LATEST POSITION 


by David Graham 


As we reported last month, there 
appear to be three main contenders _in 


the race to produce add-ons for the 
Electron: Sir Computers, Solidisk 
Technology, and Acorn themselves. Of 


these the latter two have not formally 
launched their product. Acorn's box of 
tricks, we are informed, will probably 
provide an analogue interface (for 
joysticks etc.), a printer port, and 
two ROM sockets. No firm details of 
production dates or price have been 
announced, and all that a spokesman for 
Acorn would reveal was that the unit 
would probably cost under £106. It is 
likely, we think, to be some 
considerable time before the Acorn 
add-on sees the light of day. 


Solidisk Technology demonstrated a 
prototype of their "General Purpose 
Interface" for the Electron to us last 
December. But the production unit will 
be different from the prototype we 
understand, and the functions of their 
add-on seem still to be in a state of 
flux. To the printer port, 
non-proportional joysticks and ROM 
sockets incorporated in the prototype, 
Solidisk are now considering adding a 
disc interface. But as with Acorn the 
product still seems to be at the 
planning stage, amd no firm dates or 
prices are available. 


By contrast, Sir Computers appear to 
have two products poised for launch at 
the time of writing: a 12-ROM Board, 
and a Printer and Joystick Interface. 
Both boards should be available by the 
time that you read this article. They 
cost £46 and = £45 respectively, 
exclusive of VAT; and the boards are 
said to use a connection system which 
allows one to be plugged into the 
other. Both boards will be individually 
housed in a matching casing. 


SIR_12-ROM BOARD 

As its name suggests, this board 
will take up to twelve ROMS (or Read 
Only Memories). The purpose of such 
devices is to give the Electron instant 
access to languages other than Basic, 
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such as Pascal for example, or 
applications software such as a word 
Processor. ROMs (or EPROMS) containing 
such programs are plugged into the ROM 
board, and may be called up instantly 
whenever they are required. Such a ROM 
system is implemented on the BBC micro 
- there are three free ROM sockets 
inside the Beeb - and ROM software has 
proved to be very popular with BBC 
users. In fact some of the ROMs 
currently available for the BBC micro 
may be used without modification on 
Sir's Electron ROM Board, it is 
claimed. Examples given are the two 
word processors View and Edword, and 
Computer Concept's new Graphics ROM. 
There will doubtless be a flow of 
custom built ROMs for the Electron once 
Sir's board has been released. Our own 
BBC micro ROMs, TOOLKIT (a Basic 
programmer's aid) and EXMON (a machine 
code monitor), will be released for the 
Electron shortly. 


SIR PRINTER AND JOYSTICKS INTERFACE 

Again the title of this board 
defines its function. It gives you a 
printer interface to the so-called 
Centronics standard. This is the same 
as the parallel printer interface on 
the BBC micro, and will allow almost 
any modern printer to be connected to 
the Electron. This allows text and 
programs to be listed out. If in 
addition you want to reproduce graphics 
screens on your printer you will need 
an extra piece of software called a 
screen dump; and we shall be publishing 
a selection of these for the most 
popular printers in due course. 


This second board of Sir's also 
contains a joystick interface. This is, 
we are informed, a standard analogue 
interface which will allow BBC type 
joysticks or other analogue voltage 
sources to be used with the Electron. 


If either of Sir's boards are on 
schedule, we will be reviewing them in 
the next issue. But if you want to find 
out more before then, telephone SIR on 
0222 621813. 
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KILLER DICE 


by D. Jackson 


Why not 


treat yourself to our excellent poker dice game, called 


"Killer Dice"? This is a gambling game which involves more thought 
and skill than you might at first think. Like all true gamblers you 
will soon find yourself having just one more game, and one which you 


are bound to win this time! 


For those of you who won't own up to 
having played with poker dice before, 
we start with some basic information. 
There are five identical dice, each 
with six faces representing’ the 
9, 10, Jack, Queen, King and Ace. When 
the dice are thrown, it is the 
uppermost faces which count, and it is 


these which are displayed on the 
screen. You are playing against the 
computer, taking it in turns to better 


the score of each other until one of 


you loses. At the start of the game, 
both players have 9 lives and the 
contest finishes when one of the 


players has no more lives left. 


Except when you are throwing first 
at the start of a new game, you have 
the option of retaining any of the dice 
on the table and just throwing the 
remainder. This is the course of action 
to follow if some of the dice on the 
table are particularly high scoring. In 
this computer version, you can ‘hold' 
any of the dice 1 to 5 by pressing any 
of the number keys 1 to 5 _ before 
pressing the space bar for your next 
go. If you make a mistake, pressing the 
key marked @ clears any of the dice 
currently in a hold state and you can 
start again. 


Different combinations of dice have 
different scoring values. Here are the 


winning combinations in order (highest 
value first): 

1. 5 of a kind 6. 3 of a kind 

2. 4 of a kind 7. Two pairs 

3. Full House 8. One pair 

4, High run 9. Ace high 

5. Low run 


If a player throws 5 of a kind, his 
partner is given 5 throws to equal or 
better the hand. A full house is when a 
player gets 3 of a _ kind and a pair 
together. 
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SPACE BAR TO THROW 


As you get more experienced at 
playing Killer Dice, you will find 
yourself working out various strategies 
to defeat the computer. You will have 
to try hard to succeed and you will 
also need a certain amount of luck as 
well. 


PROGRAM NOTES 

The program is well structured and 
therefore relatively easy to follow, 
but you will need to take great care 
with the mass of data statements at the 
end. These are cunningly used to define 
the characters that represent each of 
the dice on the screen. The card number 
(9 to 13) indexes to a DATA statement 
which gives the colour followed by the 
15 character definitions that are then 


poked in turn directly into the 
character buffer. Each character is 
dynamically defined as ASCII 224 and 


placed in a text window 3 wide and 5 
deep to produce the dice face. Look at 
the procedure PROCroll at line 2388 to 
see the detail of this. 

One consequence of this technique is 
that renumbering the program in any way 
may well result in a corrupted display 
because of the way the RESTORE command 
is used in the program. 
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REM PROGRAM KILLER DICE 
REM VERSION E@.1 

REM AUTHOR D.JACKSON 
REM ELBUG MARCH 1984 


ProgS="KILLER DICE" 

ON ERROR GOTO3118 

MODE6: PROCintro 

REPEAT :MODE2: PROCinitz 
REPEAT: VDU17,3,31,0,26 

IF T% PROCyou:ELSE PROCbbc 
PROCthrow: PROCscore 

IF B%& T$=-T3-1:ELSE PROClose 
UNTIL D%:PROCdead 

UNTIL E%:MODE6: PROCend 

END 

DEFPROCintro 

*PX225,128 
DIMD(5) ,N(6) ,P(6) ,L(1) 
Z%=RND (-TIME) : T$=RND (2) -2 
VDU31,12,9:PRINT Prog$ 
VDU31,5,17 

PRINT"PRESS SPACE BAR TO CONTINUE" 
VDU31,17,18 

REPEAT: PROCinkey: UNTIL I%=32 
ENDPROC 

DEFPROCinitz 
VDU23,1,0;9;0;9; 
L(@)=9:L(1)=9 
BS$=0:F%=0:V3=1:E$=0:D3=0 
VDU17,3,31,1,1 
PRINT"LIVES-ELK:9 YOU:9" 
VDU17,5,31,1,4 
FORI$=1TO5: PRINT; 1%;SPC(3) ; :NEXT 
ENDPROC 


DEFPROCyou 

PRINT"YOU TO GO"; 

Z%=BZOR (-F$>GAND-F3<5) 

IF Z% VDU17,1:PRINT"-INPUT HOLD" 
VDU17,3,31,0,29 

PRINT"-SPACE BAR TO THROW-" 
REPEAT: PROCinkey: I%=I%-48 

IF Z%:IF I$>@ AND I1%<6:PROChold 
IF I%=@:PROCcancel 

UNTIL I$=-16 

ENDPROC 


DEFPROCbbc 

PRINT"MY TURN": PROCdelay (3) 
IF B%=@ AND F%=@: ENDPROC 
X3=0:YS=0 

FORI$=6TOV%STEP-1 

IF N(1I%)>X%:XS=N (1%) sYS=1IS 
NEXT 

IF X%=1 AND F%=@:ENDPROC 
FORI$=1TO5S 


1530 
1546 
1558 
1566 
1576 
1586 
1598 
1666 
1618 
1626 
1636 
1646 
1658 
Croll 
1666 
1676 


1688 : 


1698 
1788 
1710 
1726 
1736 
1746 
1758 
1766 
1776 
1788 
ZB=5 
1798 
1868 
1818 
1826 
1836 
1846 
1856 
1868 
1876 
1886 
1896 
1988 
1918 
1926 
1936 
1948 
1958 
1968 
1976 
1986 


IF D(I%)=¥% PROChold 
NEXT 
ENDPROC 


DEFPROCthrow 

FORI%=1TO6: P (1%) =N(1I%) ANDB%: NEXT 
PROCdelay (2) 

FORI$=1T05 

IF D(I%)<8 PROCdice:VDU12 

NEXT 
VDU28,8,31,19,15—(BS*2) ,12,26 
FORI$=1T05:Z%=D (I$) 

IF Z%<8 PROCdice:PROCdelay (1) :PRO 


NEXT: VDU26: PROCcancel 
ENDPROC 


DEFPROCscore: PkOCdelay (2) 
VDU28,6,17,19,15,12,26 

X$=0: Y3=0:2%=0 

FORI$=1TO6 

IF P(I%)=0:X3=X$+1 

IF N(I%)=@:Y3=Y$+1 

IF N(I%)>Z$ZS=N (IS) 

NEXT: X3=X$ANDBS 

IF X$=1:IF P(1)=@ OR P(6)=0:X%=4 
IF Y$=1:IF N(1)=@0 OR N(6)=@:Y%=4: 
IF F%=@ AND Y%=5:F%=-6:V%=D (5) 
IF F% PROCf£ive: ENDPROC 
PROCprompt : PROCdelay (1) 

IF Y%>X%:BS=TRUE: ENDPROC 

IF X%>Y%:B%=FALSE: ENDPROC 
BS=1:X%=16 

REPEAT: Y$=6 

REPEAT 

Z%=(P(Y$) OR N(Y%)) AND X% 

IF Z%>@ AND N(Y%)>P(Y%) B%=TRUE 
IF Z%>@ AND N(Y$)<P(Y%) BS=FALSE 
Y%=Y$-1: UNTIL Y3=@ OR BS<1 
X$=X%DIV2: UNTIL X%=@ OR BS<1 

IF B$=1:B$=FALSE 

ENDPROC 


DEFPROC1lose 

IF F% ENDPROC 
PROCdelay (3) :VDU17,1,31,2,17 

IF T% PRINT"YOU";:SOUNDG,-19,10,1 


@ ELSE PRINT" I";:SOUND1,-16,101,8:SOUN 
D1,-18,81,8 


1996 
2660 
2016 
2626 
2636 
2046 
2656 
2066 
2676 
I AM"; 


PRINT" LOSE A LIFE" 
L(-T%) =L (-T$)-1 

VDU17,3,31, (-T$*6)+11,1,48+L(-TS) 
IF L(-T%) =0:D8=TRUE 

ENDPROC 


DEFPROCdead 
VDU31,4,22,17,9 
IF TS PRINT"YOU ARE";ELSE PRINT" 


» 
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2088 PRINT" DEAD" 

2698 VDU17,3,31,8,28 

2108 PRINT"SPACE BAR TO REPLAY"' 

211@ PRINT"OR RETURN TO FINISH" 

2128 REPEAT: PROCinkey:UNTILI$=320RI3=13 

2136 IF I$=13:E%=TRUE 

2148 ENDPROC 

2156 : 

2168 DEFPROCend 

2178 VDU12,17,3,31,5,12: PRINT"<BYEEEE"; 

2188 *FX225 

2198 ENDPROC 

2200 : 

2218 DEFPROChold 

2220 IF F%=-5 ENDPROC 

2238 D(1I%)=D(1%) +8 

2248 VDU17,1,31, (1$*4)-3,12,72 

2258 ENDPROC 

2268 : 

2278 DEFPROCcancel 

2286 FORI%=1T05 

2298 D(I%)=D(I$)AND7 

2308 VDU31, (I$*4)-2,12,127 

2310 NEXT 

2326 ENDPROC 

2338 : 

2348 DEFPROCdice 

2350 Y%=(I$-1) *4: VDU28,Y%,11,Y%+2,6 

2368 ENDPROC 

2376 : 

2380 DEFPROCrol1l 

2398 SOUND1,-15,20G6,1 

2400 N(Z%)=N(Z%)DIV2:Z$=RND (6) :D(1$) =Z% 

2416 IF N(Z%)=@0 N(Z%)=1: ELSE N(Z%)=N(Z 
$) *2 

2426 RESTORE (Z%*5@) +2750: READCS 

2438 VDU17,C%,17,135 

2440 FORJ$=1TO15: READX$, YS: ! &CO4=X%: !& 
COG=Y%: VDU224: NEXT 

2458 VDU17,128 

2466 ENDPROC 

2476 : 

2486 DEFPROCfive 

2498 B%=0:Z3=-F3<6 AND Y$=5 AND D(5)>= 
V3 

2500 IF Z% V%=1:F%=0: T$=-T$-1 : ENDPROC 
2519 FS=F3+1:IF F%=0:V%=1:ENDPROC 
2520 IF F%=-5:TS=-T3-1 

2536 VDU17,2,31,0,15 

2540 PRINT"Five of Kind To Beat"' 

2550 PRINT"Or Equal In ";-F%;" Throws"; 

2566 IF -F%=1:VDU127 

2576 ENDPROC 

2580 : 

2598 DEFPROCdelay (X3%) 

2600 TIME=0:REPEAT: UNTIL TIME=X3*50 
2618 ENDPROC 

2628 : 

2630 DEFPROCinkey 

2640 *FX15,1 


2650 I%=INKEY (9) 

2666 ENDPROC 

2676 : 

2686 DEFPROCprompt 

2698 VDU17,2,31,4,15 

2760 IF Z%=1 AND Y$=1 PRINT" Ace High" 
2718 IF Y%=2 PRINT"One Pair" 

2726 IF Z%=2 AND Y%=3 PRINT"Two Pairs" 
2730 IF Z%=4 AND Y%=3 PRINT "3 of a Ki 
na" 

2740 IF Z%=5 AND N(6)=@ PRINT"Low Run" 
2758 IF Z%=5 AND N(1)=@ PRINT"High Run" 
2768 IF Z%=4 AND Y%=4 PRINT"Full House" 
2770 IF Z%=8 AND Y%=4 PRINT"4 of a Kin 
a" 

2780 ENDPROC 

2798 : 

2860 DATAG,&187C7C7C,&38198008,5,9,&19 
TICTCTC ,&381 BBGGB 

2810 DATA&7C7C381 8, &88008038,0,6,&7C7C 
3816 ,&90800038 


2828 DATA&1 638006 , &69381B7C, &8G381B7C 
7&7C7C381G,&1 8380006 ,&GG381G7C 

2838 DATA&38000019,&387C7C7C,G6,0,&3886 
8816,&387C7C7C 

2849 DATA&GGGG1 G38,&7C7C7C1G,8,8,&8096 
1638 ,&7C7C7C1B 

2858 DATA1,&10387C38,&10100000,0,0,&18 
387C38,&181 08808 

2868 DATA&7C381916,&16,&181038,&7C3816 
16,&7C381816,818 

2878 DATA&38161040,&101938,0,8,&381019 
88 ,&181038 

2886 DATA&1 0000006 ,&1819387C,&1819387C 
7&381 91008 ,&18860000,&1916387C 

2898 DATA&1016,&387C3818,0,0,&1810,&38 
703816 

2986 DATA4,&26262021 ,&21720006,&C2C2FE 
FF, &55540006,& 1EGAG800 , &800008 

2916 DATA&14191G1,&181 0060, &COC48082,& 
8288D8CG , &8980808 ,&8GA1E3E 

2926 DATA&SFGFOG0G,&10101 ,&FFFFFE64 ,&64 
E6C2CG , &FCFCICG8 , &8580888 

2930 DATA&14146363, &6060COC,&93831111,& 
38386C6C, &808G ,&C8C87C7C 

2946 DATAG,G,&3838,&7C7CC6D6,6,9 

2958 DATA2,&26505051 ,&51220000,&8282FE 
FE, &55540688, &3E1CG800 ,&800000 

2966 DATA&30630303,&3030111,&1111111,&4 
56DG1 41 , S9CAAAA88 , &9CBE3636 

2978 DATA&FOFGG00,&7076707,&FFFFEE44,& 
83839329 , &FCFCOCOB , {C8C8BC8DC 

2986 DATA&1G19363 ,&6060COC,&93831111,& 
38386CEC, &8086 ,&C8C87C7C 

2998 DATAG,G,&3838,&7C7CCED6,G,5 

3066 DATA] ,&51506061 ,&51520000,&182FEF 
F,&55540000 , &8080800 , &808000 

3916 DATA&3630303,&19816151,&29111111,& 
456DG101 ,&88888888 , &8980898 

3626 DATASFOFOOGG , &3030303 ,&FFFFFETC,& 
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C7833981 , &FCFCUCGS , &BE888888 3086 DATAG,&16103,&7E3C1818,&189999DB, 
3030 DATA&1010303,&6060C0C,&93831111,& G,&8080CB 
38386C6C, &8080 , &C8CB7C7TC 3698 DATAG,G,0,G,0, 
3048 DATAG,0,&3838,&7C7CC6D6, 8,9 3108 : 
3050 DATAG,G,G,0,0,0,0 3119 ON ERROR OFF 
3060 DATAG,@,&7E7E7E3C ,&3C181800,4,0 3126 MODE6:IF ERR<>17 REPORT: PRINT" at 
3076 DATA&3070707,&3030101,&FFEFFFEF,& line ";ERL 
DBDBBDBD , & GEGEGED , &{COCG8G8B 3136 END @ 


RS SES ES 
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ADJUSTING SCREEN DISPLAYS 
Dear Sir, 

The magazine, of which we have now 
received two copies, is excellent. We 
have been impressed with the variety of 
programs and, as we are all new to home 
computers, it has been specially 
gratifying to be able to load the short 
programs and to quickly see the results 
of our handiwork. I have also had 
reason to be grateful for the Rescue 
program in issue two, when I 
inadvertently loaded a second program 
over part of a previous one! 

Please can you tell me how I can go 
about solving a problem I have with the 
Electron. I am losing the top line of 
print on my TV screen which can be very 
annoying. Is there anyway of correcting 
this? R. Pendell 


Reply: Thanks for the compliments Mr 
Pendell. Unfortunately there is no way 
that you can change the position of the 
picture on the TV screen from your 
Electron. However , TE should be 
possible to make an internal adjustment 
to your TV. This should only be carried 
out by a competent technician. 


CONVERTING PROGRAMS FOR THE ELECTRON 
Dear Sir, 

In your first issue of ELBUG you 
stated that Electron programs were 
tested on an Electron, then loaded into 
a BBC micro for printing. 

Can we assume then that any Electron 
program will load into a BBC, and more 
importantly, can some BBC programs be 
loaded into an Electron? 

Some guidance on this would, I 
think, be appreciated by all your 
readers. P.M. Beecham 


Reply: Most Electron programs will run 
alright on the BBC micro, unless they 
access directly some hardware feature 
that is Electron specific. You may find 
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that the results are different, for 
example faster games, different sounds 
etc. Because of its additional 


features, it is much less likely that a 
program designed for the BBC micro will 
run properly on the Electron without 
some modification. Because there is 
already plenty of software for the BBC 
micro, many Electron users will be 
interested in trying to convert some of 
these programs and we have started this 
month a short series of articles which 
examines this topic in some detail. 


TV/MONITOR_ RESOLUTION 
Dear Sir, 


Being one of the few people who 
actually own an Electron, I am now 
wondering what type of display to buy 
for it. At the moment I use it mainly 
with a black and white portable TV, but 
was thinking of buying a colour 
portable. 

One of the main reasons I decided on 
the Electron was its excellent high 
resolution display. However, it wasn't 
until after I bought the computer that 
I read that most colour TVs can only 
show about 350 by 200 pixels. It seems 
that the Electron's display is being 
wasted on an ordinary TV and even most 
monitors can't match the Electron's 
high resolution mode. D.E.Gordine 


Reply: The maximum resolution of the 
Electron is 648 horizontally by 256 
vertically, though the apparent drawing 
area seems to be to a_ higher 
resolution - see this month's article 
on Electron Graphics. The Electron's 
medium resolution of 328 by 256 thus 
reasonably matches the figure which you 
quote. In practice you will get a much 
sharper picture from either a monitor 
or a TV/monitor with an RGB input. The 
main reason for the improved picture 
quality is that picture degradation in 
the UHF IF circuitry of the TV is 
avoided in a monitor or TV/monitor. 
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ELECTRON SOFTWARE LIST 


Compiled by Alan Webster 


We thought that it would be helpful to Electron owners to publish a comprehensive 
list of all the software, currently available for the Electron, that we could find. 
You should be able to buy Electron software through computer shops, chain stores 
such as W.H.Smith, and by mail order as advertised in various magazines. The list of 
software that can be run on the Electron will no doubt grow rapidly. Indeed, there 
may already be new titles released by the time you read this. We shall continue to 


review the most interesting software in ELBUG. Prices include VAT. 
WMLMALhhihhhhihkhkhihhihithhhisikhhhisishkhhhikihhhbikhhs 
Title Type Price Code Title Type Price Code 
3D Maze ey! 7.58 11 Graphics Pack UT 24.95 Sl 
Airline fey 6.95 Cl Graphs ED 9.95 SI] 
Bandits at 3 O'clock ev] 7.95 Pl Graphs and Charts UT 9.26 A2 
Bugblaster oul 7.95 Al Hyperdrive eu] 7.59 TI 
Caterpillar fev! 7.50 11 Intergalactic Trader (eu) 8.95 Pl 
Chess fev) 9.20 A2 Invaders levi 7.58 11 
Chess fev) 7.95 Pl Killer Gorilla lev] 7.95 Pl 
Corn Cropper fev 6.95 Cl Labyrinths of LaCoshe lev) te9>) Pl 
Creative Graphics UT 9.28 A2 LISP L 16.10 A2 
Cybertron Mission feu! 7.95 Pl Meteors ™ 9.26 A2 
Dallas levi 6.95 Cl Monsters mM 9.26 A2 
Draughts and Reversi en] 9.26 A2 Moonraider ev] 7.95 Pl 
Draw UT 9.95 Pil Personal Money Managment H 9.26 A2 
Escape From Pontoon and Patience (ey 7.50 [1 
Moonbase Alpha fev) 7.95 Pl Positron ley! 6.95 Pl 
Felix in the Factory [eu] 7.95 Pl Primary Art ED 7.95 Al 
Felix and The Primary Time ED 7.95 Al 
Fruit Monsters [ey 7.95 Pl Scribe II UT 9.95 Al 
Flags ED 7658 “Tl Snake ‘™ 4.06 Bl 
FORTH L 16.18 A2 Starship Command ie] 9.26 A2 
French Tutor H/ED 9.95 SI Stratobomber lev] 7.58 11 
Fruit Machine ev) 5.95 Al Swoop GM 7.95 Pl 
Galactic Commander lev! 7.95 Pl Tree of Knowledge ED 9.26 A2 
Golf eu! 7.95 S$) Vectors ED 9.95 SI) 


VALLI MMMMMMMMMMMMMMLMMMM MMMM MMMM hhh 
SOFTWARE SUPPLIERS CHECKLIST 


Code Supplier Pl Program Power, 8/8A Regent 
Street, Chapel Allerton, 


Al Alligata, Superior Systems, Leeds LS7 4PE 


178 West Street, 
Sheffield Sl 4ET. 


$1 Salamander Software, 
A2 Acornsoft, 4a Market Hill, Si ee eee ee 
cambridge CB2 3NJ. st Sussex BNI] 3AA. 
Bl BEEBUGSOFT, P.O. Box 169, Program Classification 
High Wycombe, Bucks HP11 2TD. 
. Educational 
cl Cases Computer Simulations, Game 
14 Langton Way, London SE3 7TL. Utility 
ral IJK Software, Unit 3c, Moorfields wong tapes 


Business 


Moor Park Ave., Bispham, 
Blackpool, Lancs FY2 QJY. 
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THE SPIDER AND THE FLY 


by Anthony Sykes 


The amusing animated display that is provided by the program 
presented here is a good example of the screen displays that can be 
produced with user-defined characters on the Electron. 


First of all, carefully type the 
program into your Electron before 
saving on cassette. When you run the 
program, it shows a spider dangling on 
the end of a web, waiting for the 
moment when the lid on the jar opens, 
enabling it to consume the large fly 
inside which buzzes about trying 
unsuccessfully to escape. Every so 
often the fly pauses for a while before 
continuing its futile activity. 
Inevitably, the spider always does 
catch the fly in the end. 


PROGRAM NOTES 

The spider is displayed in two 
positions initially, once in the 
flashing black/white (colour 8), and 
just below that in flashing white/black 
(colour 15) in lines 5819 and 562¢. 
This gives the impression of the spider 
moving up and down. The fly is moved 
around randomly inside the jar by first 
displaying the fly in green and then 
again in the background colour, so 
making it disappear (lines 59848 to 
5098). Occasionally the fly has a rest, 
and then restarts after a short delay 
which may be terminated early by 
pressing any key. The number of rest 
periods allocated to the fly depends on 
the random value generated in line 
4916. 

The program is well structured using 
a number of procedures. 


Line Name Function 

1006 PROCspifly Defines characters 
and sets up variables 

2000 PROCfly Displays the fly 

3008 PROCspider Displays the spider 

4006 PROCinit Sets up the screen 

5006 PROCaction Controls animation 

6008 PROCending The spider gets its 
meal! 


PROCspifly sets up the user-defined 
characters for the spider and the fly. 
Note how the character strings fly$ and 
spider$ are built up in a_ manner 
similar to that described in our series 


on Electron graphics. PROCfly and 
PROCspider respectively display the two 
creatures in the required colours. 
PROCinit draws the jar and initialises 
the variables ready for use in 
PROCaction, which looks after the main 
animation. PROCending is called once 
the jar is opened, and the spider eats 
the fly! 


16 REM Program SPIDER 

28 REM Version E@.2 

36 REM Author A.SYKES 

40 REM ELBUG MARCH 1984 

5@ REM Program subjct to copyright 


188 ON ERROR GOTO 198 

11@ MODE 2 

126 PROCspifly 

138 PROCinit 

146 REPEAT 

15@ PROCaction 

166 UNTIL FALSE 

178 END 

186 : 

198 ON ERROR OFF:MODE 6:REPORT: PRINT 
"at line ";ERL:END 

260 : 

1660 DEF PROCspifly 

1918 VDU 23,246,0,8,0,26,43,65,128,0 
1620 VDU 23,241,24,24,24,102,129,153,2 
55,66 

1038 VDU 23,242,0,8,6,46,212,139,1,0 
1646 VDU 23,243,195,36,24,102,153,129, 
195,126 n 
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1058 VDU 23,244,192,176,76,35,17,33,78 
fil2 

1668 VDU 23,245,98,96,165,165, 165,165, 
126,98 

1076 VDU 23,246,3,13,50,196,136,132,11 
4,14 

1086 VDU 23,247,66,165,165,153,66,129, 
8,3 

1698 spiderS=CHRS (24@) +CHR$ (241) +CHRS ( 
242) 

11@@ flyS=CHRS (243) +CHRS (18) +CHRS (8) +C 
HRS (8) +CHRS (244) +CHRS (245) +CHRS (246) +CH 
RS (1@) +CHRS (8) +CHRS (8) +CHRS (247) 

1118 ENDPROC 

1126 : 

2000 DEF PROC£ly(col%,A%,B%) 

261@ COLOUR col%:PRINTTAB (A%,B%) fly$ 

2028 ENDPROC 

2030 : 

3006 DEF PROCspider (col%,A%,B%) 

3018 COLOUR col%: PRINTTAB (A%,B%) spider$ 

3626 ENDPROC 

3638 : 

4000 DEF PROCinit 

4018 T%=0: PS=RND (6) :AS=CHRS95+CHRSI5S 

4620 BS="|"+STRINGS (6,CHR$32) +"|" 

4030 COLOUR 14:PRINT TAB(4,24) “SPIDER 
& FLY" 

4049 COLOUR 7:PRINT TAB(6,2@)SPC(8) 

4050 VDU 23,1;3;9;0;9; 

4068 COLOUR 7:PRINT TAB(6,6)AS;"===="; 
AS 

4076 FOR T%=7 TO 18:PRINT TAB(6,T%) BS: 
NEXT 

4686 MOVE40@,415:DRAW872,415 

4098 COLOUR 7:FOR H%=@ TO 6:PRINT TAB( 
3,H&) "| ":NEXT 


4108 ENDPROC 

4110 : 

5066 DEF PROCaction 

516 PROCspider (8,2,6) 

5628 PROCspider (15,2,7) 

5038 VDU5:MOVE195,828:GCOLG,7: PRINT" |" 
:VDU4:VDU 23,1;8;0;9;0; 

5048 X%=RND (4) +7: L3=RND (4) +7 

5050 PROCfly(2,X%,L3) 

5860 TIME=@G:REPEAT UNTIL TIME>5S 

5870 PROCfly(8,X%,L3%) 

5088 TS=T%+1:SOUND 1,-15,L3,3 

5090 IF T%=60 THEN SOUND 1,-14,5,3 ELS 
E 5046 

5106 PROC£ly(19,19,15) 

511@ A=INKEY (300) :P$=P%-1: IF P%=1 THEN 
PROCending 

5120 PROC£ly(G,10,15) 

5138 T%=0:GOTO 5916 

5148 ENDPROC 

5150 : 

6000 DEF PROCending 

6618 COLOUR 7:PRINT TAB(6,6)AS;SPC(4); 


6626 A=INKEY (106) 

6830 PROCspider (G,2,6) : PROCspider (9,2, 
7) : PROCspider (3,9,14) 

6048 COLOUR @:FOR H%=@ TO 6:PRINT TAB( 
3,H&) "| ":NEXT 

6050 PROC£ly(G,10,15) 

6660 FOR Q%=58 TO 1 STEP -1:SOUND 1,-1 
5,Q%,1:NEXT 

6870 COLOUR 5:PRINT TAB(6,2@)"YUM YUM!" 
6680 A=GET 

6898 PROCinit 

6196 ENDPROC 


POINTS ARISING 


It seems as though some of the gremlins escaped from 'Return of the Diamond', 
published in issue 2 of ELBUG, and instead got up to mischief in the listings of two 
other ELBUG programs in previous issues, causing some minor but annoying bugs. The 
correct details are listed below. We would like to thank those readers who wrote to. 
us about these problems and we hope that we have now rounded up all the gremlins and 
returned them to where they will cause no more harm. 


ASTAAD (issue No.2) 
A semi-colon was lost from the end of line 356. 
358 VDU23,1,9;9;0;0; 


Hedgehog (issue No.1) 
The procedure PROCGO was incorrectly called PROC_GO in line 1656. 
1050 REPEAT: N%=N%+1:PROCGO: UNTIL N%=4 


Most of you will probably have spotted this last error and corrected it already. 
We shall double check in future to try and avoid any further errors cropping up in 
our program listings. 

Te SS 
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ELECTRON GRAPHICS (Part 4) 


by Mike Williams 


Our introductory series on Electron graphics has so far concentrated 
on user-defined characters. This month we begin to look at the use 
of the DRAW and PLOT commands that will enable us to display a 
variety of lines and shapes on the screen. 


The Electron has five graphics modes 
(modes @, 1, 2, 4 and 5). In these 
modes we can use the commands MOVE, 
DRAW and PLOT to create straight and 
curved lines and a variety of geometric 
shapes. In any graphics mode, we can 
think of the screen as a drawing area 
which is 1288 points wide and 1624 
points high. Initially, the bottom left 
hand corner of the screen is the point 
(0,0), the top left hand corner is the 
point (@,1023), the bottom right hand 
corner is (1279,@) and the top right 
hand corner is (1279,1823). Notice that 
the numbering both vertically and 
horizontally starts at zero. This makes 
the bottom of the screen the '‘x' axis 
and the left hand side of the screen 
the 'y' axis. The bottom left hand 
corner (8,0) is the origin. 


Now, although we can create any 
drawing based on the measurements given 
above, the Electron is actually capable 
of displaying far fewer points on the 
screen, the number depending on your 
choice of mode. The relationship 
between the actual number of points and 
the measurements above is called 
resolution, a larger number of points 
producing higher resolution graphics, 
and a smaller number of points lower 
resolution graphics. In practice, a 
straight line drawn with high 
resolution graphics will normally 
appear as a thinner line on the screen 
than one drawn in low resolution 
graphics. 


On the Electron, three different 
resolutions are available (low, medium 
and high), and this choice is also 
coupled with the number of colours that 
you can use and the amount of memory 
taken up, as shown in table 1. 


In a graphics mode, the GcOL 
command, described briefly last month, 
is used to select the drawing colour, 
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Table 1 


Graphics Number }Number |Memory ]Resolution 
of of Used 
Points [Colours 


20K High 
20K Medium 
20K Low 
10K Medium 
16K Low 


Mode 


Resolution in different graphics modes. 


while CLG is used to clear the graphics 
screen. As with text, the default is to 
draw in white on a black background. 
The MOVE command, which was also used 
last month, can be used to move to any 
point on the graphics screen while the 
DRAW command is used to draw a straight 
line from the last point specified (in 
a MOVE, DRAW or similar command) to the 
new point. When starting with any 
graphics mode, the starting point is 
always the origin (@,9). 


DRAWING SQUARES AND TRIANGLES 

Suppose we want to draw a square in 
the centre of the screen with a side of 
length 268. The following short program 
will do this. 


188 MODE 4 

118 MOVE 540,412 
12@ DRAW 546,612 
136 DRAW 748,612 
148 DRAW 748,412 
15@ DRAW 540,412 
168 END 


The centre of the’ screen is 
(648,512) and thus the corners of the 
square are at points which are 1088 more 
or less than these values. Note how the 
program moves to one corner and then 
draws the four sides, finishing back at 
the starting point. The program is in 
Mode 4 (medium resolution). Whether you 
actually see an exact square or not on 
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your screen is very likely to depend on 
your TV (or monitor) and how it is 
adjusted. You might like to try 
different modes to see the same result 
in high and low resolution graphics. 


In creating graphics programs, it is 
often useful to put the instructions 
necessary for a particular shape as a 
procedure. This also enables us to 
introduce more flexibility. If you are 
not familiar with procedures then refer 
to page 77 in the User Guide. Here are 
the instructions as above, now modified 
aS a procedure, which enables the 
square to be placed any size anywhere 
on the screen. 

1686 DEF PROCsquare(size,x,y) 

1010 MOVE x,y 

1628 DRAW x,y+size 

1638 DRAW x+size,y+size 

1040 DRAW x+size,y 

1658 DRAW x,y 

1868 ENDPROC 

The procedure PROCsquare requires 
three parameters, the length of the 
side of the square, and the 
co-ordinates of the bottom left hand 
corner of the square. In order to draw 
a shape like this anywhere on the 
screen, we have to decide upon one 
corner as a reference point from which 
the other corners can be calculated. I 
have also written a short program to 
illustrate the use of the procedure. 
This consists of an infinite loop which 
randomly selects a _ size and position 
for squares which are continually drawn 
on the screen. Press Escape to 
terminate this program. 

19 REM Program SQUARE2 
20 REM Version E1.@ 
30 REM Author Mike Williams 
40 REM ELBUG March 1984 
5@ REM Program subject to Copyright 


188 MODE4 

118 ON ERROR GOTO 1998 

126 REPEAT 

138 SIZE=RND (1980) 

146 X=RND (1279) : Y=RND (1023) 
15@ PROCsquare(SIZE,X,Y) 
160 UNTIL FALSE 

176 END 


198 ON ERROR OFF:MODE 6 
200 IF ERR<>17 THEN REPORT:PRINT" at 


line ";ERL 
218 END 
226 : 


One interesting point that you 
should notice when you run this program 
is that squares which are so positioned 
that part of the square disappears off 
the screen cause no problems or errors 
at all. In effect, the screen area is 
like a window onto a much larger area 
on which you can still draw, but not 
see the results. Try typing the 


following short program: 


MOVE4G, 288 
120 DRAW64G, 1506 
130 DRAW1200, 200 
140 DRAW4G, 200 

END 


This draws a triangle with the 
vertex above the top of the screen at 
(649,1580). This is a very nice feature 
of Electron graphics, as your programs 
need never check that you are actually 
drawing on the visible screen, though 
clearly there is not much fun to be had 


in deliberately drawing where you 
cannot see the results. 


DRAWING CIRCLES 

Although the DRAW command will only 
produce straight lines on the screen, 
we can still write programs that will 
produce acceptable circles. This is 
done by drawing a series of short 
straight lines. The length and number 
of lines needed will depend on how much 
of a purist you are, but it is 
initially surprising how few lines are 
needed to produce a realistic looking 
circle. The result will also depend on 
the size (radius) of the circle. Of 
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course, the more lines that have to be 
drawn, the longer the drawing process 
will take. 


To draw a circle does require some 
mathematics, though you don't really 
need to understand exactly what is 
going on. We can draw a circle by 
calculating the positions of a number 
of points equally spaced around the 
circumference, and then joining all the 
points up with straight lines. In 
practice, each short line is drawn as 
the next point is calculated. Each 
point on_ the circumference is 
calculated using the two formulae: 

x = R * COS(A) y = R * SIN(A) 
where R is the radius of the circle, 
and A is the angle between the x axis 
and the radius to the point being 
calculated. The angle must be measured 
in radians (rather than degrees) and a 
complete revolution of a circle is 2*pi 
radians. Fortunately, BBC Basic helps 
us enormously here, as the two 
mathematical functions, cosine and 
sine, are provided (COS and SIN), and 
even the value of pi is included (as 
the pseudo-variable PI). 


The two formulae given above assume 
that the origin (0,6) is at the centre 
of the circle, but we have already seen 
that this is normally in the bottom 
left hand corner of the screen which is 
not very helpful. However we can move 
the origin to a new position using the 
VDU29 command (see the User Guide page 
113). The following program will draw a 
circle with a radius of 2608 at the 
centre of the screen. 


188 MODE 4 

118 VDU29, 640; 512; 

126 radius=206 

138 MOVE radius,@ 

148 FOR angle=@ TO 2*PI STEP PI/16 
158 x=radius*COS (angle) 

160 y=radius*SIN (angle) 

170 DRAW x,y 

186 NEXT angle 

198 END 


The program first moves the origin to 
the centre of the screen (649,512), 
which now becomes the new origin and 
thenceforth all co-ordinates are 
measured from this new position. The 
starting point for drawing the circle 
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is on the circumference at (206,9), 
with reference to the new origin. A 
loop is then used to_ repeatedly 
calculate a new point on_ the 
cicumference (rotating anti-clockwise) 
and draw a straight line from the 
previous point to this one, until we 
arrive back at the starting point. The 
last number on line 148 is half the 
number of lines used to make up the 
circle. 


You might like to try running the 
program with both larger and smaller 
values to see the effect that this has 
on the shape of the ‘circle’. Of 
course, what we are really doing is 
drawing a _ polygon with a large number 
of sides that then appears to us as a 
circle. This means in turn that by 
changing this number you can use the 
same routine for drawing any polygon 
that you want. For example, if you put 
2, you should get a square, while 4 
should give an octagon (half the number 
of sides in each case). 


You may find that some values, 
because of the limitations of computer 
arithmetic, do not produce a closed 
polygon. If this happens,’ then 
replacing '2*PI' with '2*PI+@.1' in 
line 148 will usually overcome this 
problem. 


If we want to produce a program that 
will draw several circles, then it is 
sensible to write the instructions as a 
procedure, just as we did for the 
square. We can define the procedure 
with three parameters, allowing a 
circle to be drawn with any radius, and 
in any position on the screen. We could 
just package up the original circle 
procedure, putting a VDU29 command as 
the first instruction in the procedure 
to define a new origin at the centre of 
the circle to be drawn. However, 
because of the mathematical sines and 
cosines used in the formulae, circle 
drawing is a relatively slow process. 


If we want to draw several circles, 
then we can speed up the process 
considerably by calculating all the 
necessary Sines and cosines just once, 
and then saving them for use later when 
drawing a circle. This is done in the 
following program. The procedure 
PROCtable calculates a table of sines 
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and cosines, which are then used by the 
procedure PROCcircle ffor actually 
drawing a circle. 


1@ REM Program CIRCLE2 

28 REM Version E1.@ 

38 REM Author Mike Williams 

48 REM ELBUG March 1984 

5@ REM Program subject to Copyright 


188 MODE 4 

11@ ON ERROR GOTO 214 
120 DIM C(32),S(32) 
13@ PROCtable 


149 REPEAT 

158 radius=RND (840) 

168 x=RND (1279) :y=RND (1623) DRAWING POLYGONS 

17 PROCcircle(radius,x,y) The final program to be presented 
189 UNTIL FALSE this month shows how the circle drawing 
en iad idea can be adapted to draw a polygon, 


with any number of sides, together with 
all the diagonals joining every vertex 
to every other vertex. The vertices of 
any regular polygon are evenly spaced 
out around the circumference of a 
circle which thus forms the basis for 
the method of drawing. Because every 
vertex will be referred to several 


210 ON ERROR OFF :MODE6 

228 REPORT: PRINT" at line ";ERL:END 
238 : 

1808 DEF PROCtable 

1618 FOR I=1 TO 32 

1628 angle=2*PI*I/32 

1638 C(I) =COS (angle) :S (I) =SIN(angle) 


1048 NEXT I times, the x and y co-ordinates of each 
ae SSDEROS vertex are calculated first and stored 


in the two arrays X and Y. This is just 
like calculating the points around the 
circumference of a circle without the 
line drawing. 


1196 DEF PROCcircle(radius,x,y) 
111@ LOCAL I,X,Y 

1128 VDU29,x;y; 

1138 MOVE radius,@ 


1146 FOR I=] 7 32 — Once all the points are known, two 
1156 Xeradius C(I) :¥=radius*s (1) nested loops are then used to draw all 
1168 DRAW X,¥ the lines. The outer loop, controlled 
1176 NEXT I 


by the variable I, is repeated once for 
each vertex, while the inner loop, 
using the variable J, is repeated a 


118@ ENDPROC 


The circles are drawn as polygons of reducing number of times. If you 
32 sides and hence 32 sines and cosines experiment with an octagon, for 
are calculated and saved as the example, you will see the principle 
elements of the two arrays C and S. The involved. From the first vertex 7 lines 
procedure for drawing a circle first are needed, 6 from the second, 5 from 
sets a new origin as the centre of the the third and so on. This is exactly 
circle and then draws the circle as how the routine works. 


before except that the sines and 
cosines are taken from the two arrays 
instead of being calculated when 
needed. If you run the program, which 
draws random sized circles randomly on 
the screen, you will see how much 
quicker this is compared with the 
original circle drawing program. The 
pause that occurs at the start is the 


The whole polygon is drawn by the 
procedure PROCpolygon with four 
parameters, the radius of the circle 
(or size), the number of sides, and the 
centre of the circle (or polygon). The 
origin is set to the centre using the 
VDU29 command and the co-ordinates of 
time to calculate the sines and cosines all the points needed are calculated 
initially. and saved. 
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PLOT command and the drawing of filled 
shapes on the screen. 


The procedure is called 


just once 
and displays a 16 sided polygon in the 
centre of the screen complete with all 


the diagonals. You could try varying 
the parameters to produce different 
displays and the program could easily 
be extended to draw several polygons 
together on the screen, in different 
positions and either the same or 
different sizes. There is plenty of 
scope for experimenting with all these 
examples. 


REM Program POLY] 

REM Version E1.9 

REM Author Mike Williams 

REM ELBUG March 1984 

REM Program subject to Copyright 


MODE 4 

ON ERROR GOTO 160 

DIM X(64) ,Y (64) 

PROCpolygon (568,16,646,512) 
END 


ON ERROR OFF :MODE6 
REPORT: PRINT" at line ";ERL:END 


DEF PROCpolygon(radius,sides,x,y) 
VDU29,x7y7 

FOR I=1 TO sides 
angle=2*PI*I/sides 

X (I) =radius*Cos (angle) 
Y (I) =radius*SIN (angle) 
NEXT I 

FOR I=1 TO sides 

FOR J=I+1 TO sides 
MOVE X(I) ,Y(I) 

DRAW X(J) ,Y(J) 


11186 NEXTJ,I 


Next month we will continue the 112@ ENDPROC & 


series on graphics by looking at the 


HINTS HINTS HINTS HINTS HINTS HINTS HINTS HINTS HINTS 


TAB 
“When calculating TAB positions remember that the co-ordinate of the top left hand 
corner of the screen are @,@ not 1,1. 7) 
*SAVE EXTENSION - M.Sykes 

When using *SAVE to save a file, the usual method is to type: 
*SAVE <filename> <start address> +<length> <execution address>. 
This can be expanded to include the load address of the file when loaded back into 
the computer. 

The load address is normally taken to be the start address of the file. The load 
address is appended to the end of the normal set of numbers. i.e. *SAVE <filename> 
<start address> <+length of file> <execution address> <load address>. If the load 
address is typed in as FFFF then the computer cannot load the file back into memory 
unless the *LOAD <filename> <load address> command is used, offering an easy method 
of software protection, but do make a list of the necessary load addresses. Se 


COLOUR _VIDEO OUTPUT 

The Electron is capable of producing colour pictures on the composite video 
output socket by joining link LK4. This link is situated behind Q7 and next to IC13 
(which is labelled LM324N). The reason why Acorn did not connect this link is 
because the picture quality is degraded relative to the black and white picture 
obtained from the same socket. However, there is only a slight increase in the 
quality of colour from this socket and the output from the UHF output. The RGB 
output produces by far the best picture. 
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HOW TO TELL AN ELECTRON FROM A BBC MICRO 


by David Fell 


Inside your Electron there is a ROM 
(Read Only Memory) containing the 
Operating System (OS for short) which 
controls much of what goes on in your 
machine. As time goes by, it is 
possible that new versions of the 
operating system will be produced, 
either to incorporate some new 
features, or to correct '‘'bugs' or 
faults, which have been discovered in 
existing ones. To find out which 
version of the operating system is in 
your machine, Acorn have provided a 
special call. Try the following: 

*FXO <return> 
You should find that your Electron has 
replied by displaying 'OS 1.0@'. The 
'1.@6' is the version number, and it is 
by looking at this that you can tell 
which version you have. If there are 
any later versions, then they may well 
increase this number (for example 1.10 
or 1.26). The BBC Micro is similar to 
the Electron in many ways, and has 
already been through a_ number of 
different versions of its operating 
system to incorporate features not 
present in the original. In addition, 
an American version of the BBC micro 
has now been produced. All of these are 
different versions of essentially the 
same operating system. 


As well as the operating system, 
Basic is also contained within the same 
ROM in your Electron. To allow for the 
possibility that this may also need to 
be changed, Acorn have provided a way 
to tell which version of Basic is 
present (there is only one version at 
the moment, but that does not mean 
Acorn will not decide to produce 
another version). To see the way in 
which the Basic is identified, press 
the Break key on your Electron. Now 
type in: 

REPORT <return> 
You should see a line of text displayed 
saying '(C)1982 Acorn’. 


So far, we have seen how we can tell 
which versions of the operating system 
and Basic are in our machine. The 
messages displayed tell us which 
version, but not which machine. For 


example we could have OS 1.00, but is 
it an Electron, a BBC Micro, or an 
American BBC Micro operating system? 
Because of the inherent similarities 
between the machines mentioned above, 
it is tempting, particularly for 
producers of commercial software, to 
write one piece of software and to 
modify it slightly for the different 
machines, than to write three pieces of 
software to do the same thing on the 
three different micros mentioned. To 
allow a program to distinguish between 
the different machines, the INKEY 
command has been extended. If you look 
in your User Guide, you will notice 
that there is no key whose negative 
code is given as 256. The function 
INKEY-256 will return a value depending 
on the machine and operating system 
with which it is used. The current 
range of possible values is shown in 
the table. 


Operating System Value Returned 
Electron 1.96 1 
BBC 0.16 6 
BBC 1.00/1.28 -1 
BBC USA 254 


Table showing values 


returned by 
INKEY-256 on different machines. 


If you type: 
PRINT INKEY-256 
on your Electron then the value '1! 
should be displayed and this value 
could be checked within the program 
itself by assigning it to a variable 
rather than just displaying it on the 
screen. For example, try running the 
following program: 


16 IF INKEY-256=1 THEN PRINT "This is a 


n Electron." ELSE PRINT "This is not an 
Electron, it must be a BBC Micro." 
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MOVING CHEQUER BOARD 


by D. D. Harriman 


This month we bring you a short and fascinating graphics program by 
D.D.Harriman. This is a striking example of the animated graphics 
that can be achieved simply by switching colours using a VDU 
command. 


This program presents the black and produced by drawing different parts of 
white squares of a chequer board in an object in different logical colours 
such a way that the squares appear both (initially all set to black), and then 
to get larger and move towards you as _ highlighting each part in turn using 
you watch. Just type the program into the VDU 19 command. This program shows 
your Electron and then run it to see just how effective the results can be. 
the visual effects that result. 


EN'Z 


The program is essentially based on PROGRAM DESCRIPTION 


the use of the VDU19 commahd (see User After some initial assignments the 
Guide page 107). This is of the form: program starts by drawing bands of 

VDU19,L,A,8,9,0 colour, decreasing in width, from the 
where L is’ the logical colour number bottom of the screen up to 


(the range depends on the mode approximately the halfway point (lines 
selected) and A_ is the actual colour 158 to 198). The next routine (lines 
(from @ to 15). The program uses mode 2 216 to 278) uses exclusive OR plotting 
which allows 16 logical colours. The to draw perspective bands (each made of 


chequer board is drawn initially using two triangles) across the horizontal 
14 of these colours which are then lines. Each such band is four times as 
repeatedly changed between black and wide at the front as it is at the rear. 
white to give the effects that you Having done this the moving chequer 
observe. The other two colours out of board effect is produced by repeatedly 


the 16 are used to provide white text executing the procedure PROCspeed which 
and graphics against a black background uses VDUI9 to switch the colour 
in the top part of the screen. assignments. We have embellished the 
area above the chequer board with some 

Many effective animations can be 
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additional text and graphics (lines 299 
to 386). You could easily define this 
area as a text and/or graphics window 
where other images could be produced. 


SOME USEFUL VARIABLES 


J% - determines the width and hence 
number of squares across the 
screen. 

X$ - sets the x co-ordinate for the 
centre of the circle. 

Y$ - controls the height of the 


REM Program CHEQUER 
REM Version E@.2 


REM Author Delos D.Harriman 
REM ELBUG- March 1984 
REM Program subject to Copyright 


MODE2:ON ERROR GOTO 53 
J%=64:AS="ELBUG " 
VDU23;11,0;0;0;¢ 

COLOUR7 :COLOUR1 43:VDU19,15,0;0;12 
X3=646: Y3=640: R=640: Y=Y$:C3=-1 
FOR F=1 TO 6 STEP 6.03 

C$=C$+1 sC$=CS- (C$=7) s IFC$=15:CB=G 
GCOLG, 128+C3: L=¥: Y=Y3/F 

VDU24, 6; Y8-L; 1279; Y%-Y;:CLG 

NEXT: VDU26:GCOL3,8 


FOR F%=-648 TO 639 STEP J% 
MOVE646+F% , Y3-Y 2X1 3=640+F3*4 
MOVE X1%,@:FS=F%+J%:X23=640+F3 
Y2$=Y%-Y : PLOT85, X23 ,Y2% 
PLOT85 , 640+F%*4,0 

MOVE X1%,@:DRAW X2%,Y2% 

NEXT: GCOL@,7 


FOR C=1 TO 4 STEP 3 
FOR I=@ TO PI STEP PI/C/32 


chequer board on the screen. 
Y%-Y - marks the actual height of the 
chequer board on the screen. 
- the text displayed on the screen 
at the end. 


AS 


If you change the FOR statements at 
lines 416 and 448 to count in the 
reverse direction (up instead of down), 
you will find the chequer board moves 
away from you instead of towards you. 


310 X1=X%$+R*COS (I) /C:Y1=Y$+R*SIN(I)/C 

320 MOVEX$,Y%-Y:DRAW X1,Y1-Y 

338 NEXTI,C:PRINT TAB(G,9); 

346 : 

350 FORI$=1 TO 3:FOR F%=1 TO LEN(AS) 

360 PRINT MIDS(AS,F%,1) ;: PROCspeed 

370 NEXTFS,1% 

380 REPEAT: PROCspeed: UNTIL FALSE 

398 : 

400 DEF PROCspeed 

410 FOR A%=6 TO @ STEP -1 

429 VDU19,A%,7;9; : VDU19,AS+8,9; G9; 

438 PROCW:NEXT 

446 FOR A%=14 TO 8 STEP-1 

450 VDU19,A%,7;0;:VDUI9,A3-8, 0; G; 

466 PROCW:NEXT 

478 ENDPROC 

486 

498 DEFPROCW 

500 TS=TIME:REPEAT UNTIL TIME-T$>1 

518 ENDPROC 

528 : 

53@ ON ERROR OFF:MODE 6 

540 IF ERR<>17 THEN REPORT: PRINT" at 
line ";ERL 

558 END 
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EXTRA _ FUNCTION KEYS 


The Break key can be programmed as function key 18. The most useful definition is 


*KEY1@ OLD|M 


Then when this key is pressed, it automatically retrieves 


break; though 
“Bad Program" message. 


In a Similar way, the cursor and copy keys may also be programmed 


keys 
with the following function key values: 


your program after 


as 


COPY 11, LEFT 12, RIGHT 13, DOWN 14, UP 15 


PLOT EQUIVALENCE 


the 
if you press the key with no program in the machine you will get a 


function 
11 to 15, by using *FX4,2. This disables their normal function, replacing them 


All PLOT commands can be replaced with a VDU command of the form VDU 25,K,X;Y; 
where K,X,Y have the values outlined in the User Guide on page 176. 
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SOUND ENVELOPE EDITOR 


by Ian Soutar and Mike Williams 


This month we present a program which not only makes it very easy to 
design and experiment with sound envelopes but shows you graphically 
on the screen exactly what the envelope looks like each time. 


The Electron has two sound channels, 
one capable of producing tones (channel 
1) and the other generating a variety 
of noises (channel 9). Sounds do not 
just happen by themselves, but must be 
programmed like any other feature of 
the Electron, using in this case the 
SOUND and ENVELOPE commands. Now 
although the SOUND command is not too 
difficult, a quick look in the User 
Guide is often enough to put many 
people off from trying to understand 
and use the ENVELOPE command. The 
program that is included with this 
article is designed to help you 
understand sound envelopes and to allow 
you to experiment with sound by means 
of an easy to use sound and envelope 
editor. The User Guide also contains a 
whole chapter detailing the SOUND and 
ENVELOPE commands beginning on page 
116. 


SOUND COMMAND 

The SOUND command on the Electron 
has the following format: 

SOUNDc ,v,p,d 

where c is the sound channel (@ or 1), 
v is the volume or loudness, which on 
the Electron is either on (-15) or off 
(8), p is the pitch of the note played 
and d is the duration of the note. Both 
pitch and duration can be changed using 
the Sound Editor. Using the sound 
command alone will produce just single 
notes. Much more interesting effects 
can be produced by using a_ sound 
envelope. 


On the Electron the amplitude of a 
note cannot be varied, and is simply 
switched on and off. It is the pitch of 
the note that is varied using the 
ENVELOPE command, and the resulting 
graph or shape of the note as time 
passes is called a sound envelope. Once 
an envelope has been defined in a 
program it can be used with any SOUND 
command by replacing the 'v' parameter 
by the envelope number (in the range 1 
to 16). 


ee a I EE 
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SOUND AND ENVELOPE EDITOR 

Although the ENVELOPE command used 
on the Electron has a total of 14 
Parameters, only eight of these are 
meaningful, the other six being set as 
recommended in the User Guide to 
maintain compatibility with the BBC 
micro. The Sound Editor allows you to 
change any of these eight parameters, 
immediately displaying the new sound 
envelope graphically on the screen. In 
experimenting with different envelopes, 
the program provides six options. These 
are: 


Cc (Change) Allows parameters to be 
changed. 

N (Next) Moves on to the next 
parameter. 

E (End) Ends the program. 

P (Pitch) Allows the pitch of the 


note to be changed. 
Allows the duration of 
the note to be changed. 
Plays the current sound. 


D (Duration) 
L (Listen) 


Each time any parameter is altered, 
a new graph of the sound envelope is 
immediately displayed. There is full 
checking on all the sound and envelope 
parameters displayed, and the sound may 
be heard at any time by pressing 'L'. 
Once you are satisfied with a sound 
that you have produced, you can copy 
down the sound and envelope parameters 
from the screen and use them in any 
program of your own. 


CREATING ENVELOPES 

The eight parameters of the envelope 
command are concerned with the 
definition of the pitch envelope (see 
page 121 in the User Guide). The visual 
display of the pitch envelope is an 
indispensable aid to understanding and 
producing really good sound effects for 
use in any program. When you first run 
the sound’ editor, the sound and 
envelope parameters are already set up 
as follows: 
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s Pil Pi2 Pi3 Prl Pr2 Pr3 
1 G G 6 46 46 46 
pitch = 56 duration = 26 


iy is SATE ASS see Aree aot 
. rT) oe ize 


Pil Pi2 Pi3 Pri Pr2 Pr3 
8 8 8 46 ae ae 


£3keese Hext End PE bon Surgi ion 


You will see that the pitch envelope 
is a straight line, and if you press 
'L' you will hear a single unchanging 
note that lasts for 1 second. The 
duration of a sound is’ given in 
twentieths of a second and hence a 
duration of 28 is equivalent to 1 
second. The pitch, which is part of the 
SOUND command, can be altered by 
pressing 'P'. The range allowed is @ to 
255 while values outside this range are 
converted within the program by adding 
or subtracting 256 until the value is 
within range (the SOUND command does 
this automatically). Try entering 
different values of pitch and duration 
to see the effect. 


VARYING THE PITCH 

At the moment, the note produced by 
the sound editor is of constant pitch. 
To make it vary we need to alter one or 
more of the pitch increment parameters 
Pil, Pi2, Pi3. Each controls the rate 
of change of pitch in one of three 
segments of the pitch envelope. Try 
changing Pil from @ (no change) to 3. 
The graph of the pitch envelope shows 
an angled line taking the pitch up from 
5@ to 176, where it straightens out. If 
you press 'L' you will hear it do this. 


In fact it increases at the rate of 3 
units of pitch for each 4@ units of 
duration (since Prl defines the 
duration of the first segment) - it 


thus increases by a total of 128 units 
taking it from 5@ to 176. 


The other two segments can _ be 
altered accordingly. If you change Pi2 


to 1, you will see that in the second 
segment the note now continues to 
increase in pitch, but at only one 
third of the rate of the first segment. 
If you change Pi3 to -4 the pitch will 
drop by 4 x 4@ units returning it to 
the starting value of 506. If you want 
to hear a number of full cycles of this 


sound, just increase the duration. 
Taking it from 28 to 6@ should give 3 
full cycles. 


Pil Pi2 PAS Pri Pr2 Pr3 
2 2 2 38 38 66 


ge Wext E>nd P2Agtob duration 


If you require only a two segment 
pitch envelope, you can amalgamate two 
adjacent segments. This is done by 
giving them the same Pi factor. Thus if 
you change Pil and Pi2 both to the 
value 2, you will get an uneven two 
segment inverted "V" shape envelope. If 
you want to make it symmetrical, just 
make Prl + Pr2 = Pr3, and change Pi3 to 
-2. A little experiment will show why. 
The values Pil = 2, Pi2 = 2, Pi3 = -2, 
Prl = 36, Pr2 = 30, Pr3 = 60 thus 
produce a symmetrical inverted "V" of 
duration 1.2 seconds. 


You can change the starting pitch by 
altering pitch on the screen - but note 
that if the envelope takes the pitch 
outside the range @ to 255, then there 
will be a wrap-around effect (so that 
going below zero causes a jump to 255 
etc). The audio effect can be quite 
interesting, though the screen plot 
does not take the wrap-around effect 
into account. You will also find that 
in some cases the values displayed 
beside the axes of the graph overlap 
and become unreadable. 


RAPID PITCH CYCLES 
A different kind of sound effect can 
be achieved by executing a whole series 
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of much shorter pitch envelopes. To 
achieve this, return duration to 26, 
and enter the following values into the 
pitch envelope: 


s Pil Pi2 Pi3 Prl Pr2 Pr3 
1 26 -15 -15 6 3 3 
pitch = 56 duration = 26 


6 


Pid Pri Pr2 Pr3 
-15 6 3 3 


Pia 
1 26 


Pi2 
-15 


Eppapge Wext Ernd Pr4Agoh Drurggion 


This produces quite an interesting 
sound. Note that the duration of each 
pitch envelope is 9.12 seconds (the 12 
on the right hand side of the graph), 


so there are about 19 full 
the duration 


cycles in 
specified. The pitch 
envelope is still, as you see, an 
inverted "Vv", though not a completely 
symmetrical one. Changing the pitch to 
226 to give a wrap-around makes quite a 
different sound. Making the envelope 
more oblique further changes’ _ the 
effect. Try the following: 


s Pil Pi2 Pi3 Prl Pr2 Pr3 
1 -12 -12 -12 6 4 2 
pitch = 22@ duration = 20 


There are many different effects 
that can be produced in this way - 
either by changing the overall shape of 
the envelope or by using the 
wrap-around effect, and this can be 
left for experiment, though here are 
three more, the first of which produces 
a tremolo or warble. Each uses a_ pitch 
setting of 226 (though the duration 
@epends on how long you wish the sound 
effect to continue). 

s Pil Pi2 Pi3 Pri 

1 -1 -1 6 
1 127. -1 -1 6 3 3 
1 -12 -1 -1 6 


PROGRAM ENVELOPE EDITOR 


AUTHOR I.SOUTAR 

VERSION E1.@ 

ELBUG MARCH 1984 

PROGRAM SUBJECT TO COPYRIGHT 


DIM E%(7),PS(7), 
MODE1: PROCstart 
VDU19,1,6,0,9,0 
ON ERROR GOTO 756 
CLS : PROCgraph : PROCedit (1,7) 
END 


3(7,1) 


DEFPROCplay 
150 ENVELOPE 1,E%(1),E$(2) ,E$(3) ,E%(4) 
,E% (5) ,E& (6) ,E3(7) ,126,9,0,-126,126,126 
166 SOUND1,1,p%,d$ 
178 ENDPROC 
188 : 
198 DEFPROCgraph :h=1152/(E% (5) +E% (6) + 
E3(7)) 
206 
216 
220 
238 
246 
256 
268 
276 


VDU24 , G; 420; 1279; 1623; :CLG 
V=p%:V=p%3:FOR I3=2T04 
V=V+ES% (I$) *E$ (I1$+3) :IF Vov v=V 
NEXT: V=v: IF v=@ v=1 

v=480/v 

GCOLG, 3:MOVE1279,512 

DRAW1 27,512:DRAW127,1023 
MOVE1 27, (512+p%*v) 
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286 P%=p%:Q%=0:GCOLG,2 

290 FORI%=2TO 4: P$=P$+E% (1%) *ES (13+3) 
3Q3=Q3+E% (I$+3) : DRAW (127+0%*h) , (512+P%* 
v) :NEXT 

368 VDU5:MOVE-10,528: PRINTSPC (3) ;"O": 
MOVE-10,528+p%*v: PRINTFNstr (p%) :MOVE-1 0 
,512+V*v: PRINTENStr (V) 

318 Q%=8:FORI$=5TO7: P$=G: IFI$=5 THEN 
P$=32 ELSE IF I%=7 P%=-32 

328 Q3=Q3+E% (I$) sMOVEQS*h+P%, 500: PRIN 
TFNstr (Q$*E$ (1) ) sNEXT 

336 VDU4:VDU26 

348 ENDPROC 

358 : 

360 DEFPROCedit (S%,F%) :J%=0:FORI$=S8T 
O F%:COLOUR3: J$=J%+1 : PRINTTAB (J%*5, 29) ; 
PS (1%) ; s;COLOUR] : PRINTTAB (J%*5-1 , 22) ;FNs 
tr (E$ (I$) ) sNEXT 

376 COLOUR3: PRINTTAB (@,26)"C) hange N) 
ext E)nd P)itch D)uration":J3=1 

388 PRINT"L) isten"; :COLOUR] : PRINTTAB ( 
19) FNstr (p%) ; TAB(28) FNstr (d%) 

398 : 

400 PRINTTAB(@,29) ; STRINGS (79,CHRS$32) 

41@ PRINTTAB (J%*5,23) CHRS$32; :XS=GETS: 
IFXS="N"THENJ$=J%+1 : GOTO51@ 

420 IFXS="E" VDU22,6:END 

436 IFXS="L"PROCplay:GOT0408 


Volume-! Issue-4 


23 


a ae a er a BE EE EEE SE eet 
449 IFXS="D" PRINTTAB(@,29) “Duration 589 IFx<>@H=H+x*v:Q=Q+x/1 @0:MOVE111+H 

(@ to 255)";: INPUTIPS:d$=FNip(d$) MOD 2 , 490: PRINTS : MOVEy , 450: PRINTGS"=""; INT (Q 

56: PROCgraph: PRINTTAB (28,27) FNstr (d%) :G *160) /1G@ 


OTO488 598 ENDPROC 

450 IFXS="P" PRINTTAB(@,29)"Pitch (6 698 : 
to 255)";:INPUTIP$:p%=FNip(p%) MOD 256: 619 DEFFNip(v1) 
PROCgraph : PRINTTAB (19,27) ;FNstr (p%) : GOT 626 IF IPS$="" VL=vl ELSE VL=VAL(IPS) 
0488 638 =VL 

460 IFX$<>"C"VDU7:GOTO406 640 : 

476 X$=S$+J$-1 : PRINTTAB(9,29) "Range o 650 DEFFNstr (n) =STRINGS (4—(LEN (STRS (n 
f ";PS(X%);" is ";1%(X%,6);" to "713 (XB ))) ,CHR$32) +STRS (n) 
,1):PRINT"Change to ";STRINGS (20,CHR$32 660 : 
) : INPUTTAB (11,30) ,IPS:IF IPS<>"" E%(X$%) 676 DEFPROCstart 
=VAL (IPS) 688 p=50:ds=28 

480 IFE%(X%)<1%(X%,8) OR E%(X%)>18(X3 698 FORI%=1TO7: READPS (1%) :READ13 (13,93 
, |) VDU7:GOT0478 ) :READ1$ (1%,1) :NEXT 

490 IFS%=1 PROCgraph 708 DATA " s",@,255,Pil,-128,127,Pi2, 


500 PRINTTAB(J$*5-1,22)SPC(4) ;TAB(J$* -128,127,Pi3,-128,127,Pr1,0,255,Pr2,G,2 
5-1, 22) ;FNstr (E$ (X$) ) :VDU28,9,31,39,29: 55,Pr3,0,255 


CLS: VDU26 718 FORI$=1TO7:READE$ (I$) : NEXT 
510 IFJ3=F3-S$+2 J3=1 726 DATA 1,0,0,8,40,40,49 
520 Goro399 730 ENDPROC 
530 IFS%=1 PROCgraph 746 : 
540 GoTO390 75@ ON ERROR OFF 
550 ENDPROC 766 IF ERR=17 GOTO 100 ELSE MODEG 
568 : 77@ REPORT:PRINT " at line ";ERL 
578 DEFPROCg(x,q$,y) : IFqS="A"H=0:0=0 786 END € 
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CURSOR CONTROLS 

The cursor movements are all defined in the ASCII (American Standard Code for 
Information Interchange) code, and can be incorporated into strings for formatting a 
print statement. For example, if you want to print 'Electron' vertically on the 
screen, instead of TABbing each character individually into its position, you can 
use the following routine: 

18 PRINT TAB(10,18); 

28 VDU 69,16,8,198,19,8,191,19,8,99,10,8,116,16,8,114,10,8,111,16,8,116 

38 END 

Line 18 sets the cursor to the initial starting position, line 20 prints out the 
characters of the message, and moves the cursor down and to the left after each 
letter is printed. The relevant codes are: 
8 move cursor to the left one position 9 move cursor to the right by one position. 


16 move cursor down one line 11 move cursor up one line 
13 move cursor to the start of the current line @ 
WIDTH 


The WIDTHx command allows any text printed on the screen to be displayed ina 
column x characters wide. Normally there is no limit, and the computer overflows to 
the next line. To obtain the default setting, enter WIDTH@. @ 


GETTING RID OF _? ON INPUT 

INPUT ""AS will not print a question mark. A message can be put between the 
quotes, but you must not put a ',' after the message, otherwise the question mark 
will be output. & 
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GRAPHICS SOFTWARE FOR THE ELECTRON 


reviewed by David A. Fell 


Two companies, Program Power and Salamander Software, have released 
programs for the Electron which exploit the graphics capabilities of 
this micro. On closer examination, the two packages turn out to be 
quite different products, the one from Salamander Software being a 


quite respectable colour graphics package, while that 
Power is more of a _ programming 


from Program 


language (based on Logo) for 


producing black and white drawings. David Fell has tried both 
packages and reports in detail below. 


Title : DRAW 
Supplier: Program Power 


Price : £8.95 inc. VAT 
Rating : *** 


Both parts of this package are 
written in Basic, and loading is very 
easy. One fact that became obvious once 
the programs had loaded was that this 
was a BBC Micro version in an Electron 
case. The title page was a Mode 7 
display, and included double height 
control codes, which the Electron could 
not apply to its display! 


The package provides a new 
programming environment for the user. 
Some Electron owners may already have 
taken the time to investigate the 
'Turtle' program provided on the 'B' 
side of the 'Welcome' cassette and 
described in the book "Start 
Programming with the Electron" by 
Masoud Yazdani that comes with the 
Electron. DRAW provides similar 
facilities, but also has other 
features. All interaction with the 
package takes place in mode 4, with the 
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screen neatly split into two halves 
vertically. The left hand half is used 
for prompting, while the right hand 
half displays useful information. 


Drawing consists of a series of 
commands that are similar to some Basic 
commands. For example, the following 
DRAW 'program' will produce a square on 
the screen: 

SQUARE SIZE 
repeat 4 
move SIZE 
turn 96 

end repeat 
finish 


The first line names a procedure as 
"SQUARE', and gives it the parameter 
SIZE. This allows the routine to be 
used to produce a square of any given 
size, for example: 

SQUARE 100 
will draw a square of size 100 units. 


If you follow through the commands 
comprising the program, you should see 
how logical and simple a program in 
DRAW, (and Logo for that matter), can 
appear. Using procedures like these as 
building blocks, you can go on to 
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define very complex routines to draw a 
variety of geometrically based shapes 
on the screen. 


Programs are stored internally with 
an identifying name. When, you ask to 
run a program (achieved merely by 
pressing 'R'), then all the names of 
the programs held within memory are 
listed out, along with an associated 
number. You now type in this number, 
press Return, and the program is run. 
As you may have gathered, DRAW allows 
more than one program to be resident in 
memory at once. In fact, you can have 
up to 29 programs in memory together, 
each with up to 3@ lines. 


In addition to this, you may use any 
procedures of your own that you have 
already defined. 


CONCLUSION 

The DRAW package seems well thought 
out, and provides clear menus to help 
the inexperienced user. The manual is a 


photocopied one, amd lacks’- the 
legibility in places that one would 
expect of Program Power, but the 


description of the program is more than 
adequate. The program is apparently 
designed to run on both the Electron 
and the BBC Micro. When available, the 
Program will be able to take advantage 
of a printer, if attached, to produce a 


hard copy dump of the screen. The 
program could, however, have been 
better prepared for the Electron 


(Program Power have said a new version 
will be produced), and I would think 
that most users will find the Turtle 
program on the 'Welcome' cassette to be 
quite adequate. 


The commands allowed within a program 
are: 

move program 

turn pen up 

repeat pen down 

end repeat finish 
Title : Electron Graphics System 
Supplier: Salamander Software 
Price : £9.95 inc. VAT 
Rating : **** 


The Electron Graphics System from 
Salamander Software is a flexible and 
powerful piece of software that allows 
you to create your own screen images in 
any of the '20k' modes (i.e. modes G, 
1, and 2), and to store amd later 
recall them from tape. The cassette is 
attractively packaged, complete with a 
well printed manual. A similar package 
launched some time ago for the BBC 
micro, has already proved very popular, 
and this Electron program is based on 
that version. 


Loading the system is very easy; 


being accomplished by the almost 
mandatory 
CH."" <return> 


and the two parts of the program load 
fairly quickly. Also provided on the 
tape are some example screens, which 
show ‘mountain drawing', apparent 
motion by means of colour redefinition, 
and 'tree drawing'. These are produced 
in modes 2, 1 and @ respectively 
(Personally, I found the tree a little 
strange). 


When the program is running, the 
screen is split into two parts. The 
top, and larger part, contains the 
drawing which is being produced, with 
the lower section displaying various 
prompts and other information. The 


sequence of commands used to generate 
any picture is remembered by the 
program as the picture is built up, and 
there are facilities to erase the 
effects of the last command, and to 
redisplay the picture in the state that 
it was in before the last command was 
executed. This allows for any mistakes 
to be corrected. 

The 


commands available are both 
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powerful and comprehensive. The cursor 
keys are used to position the cursor (a 
flashing set of cross hairs), and the 
Space Bar is used to 'fix' a point. For 
example, the command for a line is 'L', 
and the system then prompts for the 
‘start' of the line. The user moves the 
cursor to the desired start point, and 
then presses the Space Bar. The system 
then prompts for the 'next' point, and 
this is indicated in the same manner. 
As the cursor is moved to the next 
point, a flashing line is displayed to 
indicate where the final line would be 
if drawn in the current position. This 
‘elastic banding' facility is a very 
useful feature, allowing you to see the 
result of drawing a line before it is 
finally fixed. 


Other facilities available include 
parallelogram drawing from any three 
points, circle and arc drawing, 
physical and logical colour changes, 
text displays from any position on the 
screen, filling of any shape, and 
pattern repetition. 


The shape filling is achieved by 
using the built in PLOT extension, and 
so does not cope completely with 
complex shapes, small areas often being 
left unfilled. A more flexible routine 
could have been written to do this, but 
this would have used more memory, and 
hence reduced the complexity of picture 
that can be produced. Indeed, apart 
from the slightly 'sluggish' handling 
that results from a Basic program 
running in the high resolution modes, 
this is probably my only other 
criticism of the package. Whilst 
reading the manual, I spotted a number 
of errors, but a conversation with 
Salamander Software revealed that a new 


manual will be produced to correct 
these. 
CONCLUSION 

The package is well produced and 
allows for some quite effective 


pictures to be created and saved to 
tape. I would recommend this package to 
any Electron owner interested in 
experimenting with graphics. 


HINTS HINTS HINTS HINTS HINTS HINTS HINTS HINTS HINTS 


ALTERNATIVE ESCAPE ACTIONS 


If you find that you keep pressing the Escape key accidentally whilst 
then you may be interested to know that it is possible to redefine almost 
any key to return the escape action by using *FX220. For example *FX220,5 will 


program, 


running 


give the escape condition if you press the Control and 'E' keys together. 


DISABLING THE ESCAPE KEY & DESTROYING PROGRAMS 


*FX 200,@8 Re-enables the Escape key. 


*FX 200,1 Will disable the Escape key. 


*FX 200,2 enables the Escape key, 


but pressing Break will clear the memory, 


preventing the program being retrieved with OLD. 
*FX 200,3 disables the Escape key, and clears the memory on Break. 


*COMMANDS - A.Pemberton 


When using the structure IF...THEN *<command>, the THEN is not optional. 


LOWER CASE BASIC - A.Armstrong 


If you redefine the two characters @ and } by running the following program, 


will 
work aS upper case. 


18 MODE4 


26 VDU 23,64,60,60,60,60,60,60,60,60 
38 VDU 23,125,9,9,255,255,255,255,8,6 
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only 


you 
find all upper case letters will now be printed in lower case, yet they still 
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USING BBC MICRO PROGRAMS ON AN ELECTRON (Part 1) 


by David Graham 


It is early days for the Electron, and software to run on it (like 
the machine itself?) is in short supply. So why not convert some of 
the many available BBC micro programs to run on your Electron. David 


Graham looks into the problem. 


The Electron has many things in 
common with its big brother the BBC 
micro, and the Electron was designed to 
be compatible with the Beeb in as many 
respects as possible. It should 
therefore be possible to convert some 
of the many programs for the Beeb to 
run on your Electron. After all they 
both run an identical version of BBC 
Basic. 


In spite of the extreme similarities 
between the machines however, there are 
many things to look for when converting 
software, as we have discovered in our 
conversions of certain BBC micro 
programs for presentation in ELBUG. For 
this reason, a word of warning is in 
order. It is not advisable to buy 
commercial BBC software in the hope 
that it will run on the Electron. The 
chances are either that it will not run 
at all or at least that it will not run 
satisfactorily. This is especially true 
of games, which are usually in machine 
code, and which will generally be 
protected; so making them doubly 
difficult to modify. On the other hand, 
there is no harm in trying to load ina 
borrowed BBC micro cassette - the 
recording format is identical, and you 
might just be lucky. 


In this article I shall be concerned 
with the modification for the Electron 
of programs written in Basic. But even 
here there are certain kinds of program 
which will not yield good results - and 
should be avoided. These are as 
follows: 


1. Programs written largely in Mode 
7 (see later) - especially those using 
Mode 7 graphics. 


2. Programs in which multi-voice 
music is essential - e.g. a 3 voice 
rendition of a Bach Cantata. 
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3. High speed games - especially 
those for which the use of modes @, 1 
or 2 is essential. 


4, Programs for which printers, 
light pens or joysticks are essential. 


5. Programs which use the timer in 
the second 6522 chip in the Beeb 
(extremely rare in Basic programs). 


This list may give the impression 
that the majority of BBC micro programs 
cannot be used on the Electron. This is 
not in fact the case as we have 
discovered, though conversion often 
involves considerably more than 
altering a couple of program lines. 


GETTING STARTED 

If you have a program listing that 
you wish to use on the Electron, it is 
probably best to type it into your 
Electron and try to run it in the first 
instance. After all it may work 
faultlessly. It is more likely however 
that certain 'fixes' will be required. 
The remainder of the article will cover 
some of the problems that might arise. 


Table 1 gives a list of potential 
problem areas. The three major 
difficulties arise from the Electron's 
lack of a Mode 7, its pruned down SOUND 
and ENVELOPE facilities, and its slower 
speed (especially noticeable in modes @ 
to 3). 


Of these, the latter often proves to 
be the most troublesome in games 
programs. Mode 7 can also cause a few 


headaches, though these are rarely 
insurmountable. SOUND and ENVELOPE 
incompatibilities are not often so 


serious, if only because the production 
of authentic sounds and sound effects 
is not usually vital to a program. We 
begin our survey with a look at Mode 7. 
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TABLE 1 
Program Conversion Problems 
BBC micro to Electron 


MODE 7 
The Electron has no Mode 7. 


SOUND 

The BBC micro has 4 sound channels (1 
noise and 3 tone); the Electron has 2 
only, 1 noise and one tone. On the BBC 
micro sound may have 16 different 
volume levels. On the Electron sound is 
either on or off. 


ENVELOPE, 

The BBC micro may have up to 16 
Envelopes simultaneously defined. The 
Electron allows one only. Of the 14 
parameters in an Envelope on the BBC 
micro only the first 8 are used on the 
Electron because amplitude is not 
variable. 


SPEED 

The Electron runs a little slower than 
the BBC micro in modes 4, 5 and 6. In 
modes @, 1, 2 and 3 it is considerably 
slower. 


CURSOR DELETE 
Certain versions of the cursor delete 
command on the BBC micro do not work on 
the Electron. 


OTHER VDU23 CALLS 

Certain other DU 23 calls on the BBC 
micro - such as the ones which permit 
sideways scrolling and other forms of 


so called hardware scrolling, amd 
changing the picture height are not 
implemented on the Electron. 


JOYSTICKS 

The ADVAL statement in BBC Basic with 
which the BBC micro reads the state of 
its analogue port, into which joysticks 
and other devices may be plugged, has 
no effect on a basic Electron (though 
hardware add-ons may implement this). 


*EX CALLS 

Certain *FX calls implemented on the 
BBC micro are not implemented on the 
Electron. These will mostly be 
associated with hardware not interfaced 
to the Electron - e.g. printer 
interface, analogue interface, video 
controller chip, 6522 etc. 
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MODE 7 

The BBC micro has eight possible 
screen modes compared to the Electron's 
seven. Mode 7 on the BBC micro is not 
implemented on the Electron, and has no 
direct equivalent. In fact Mode 7 is a 
rather unusual mode in many respects. 
It takes only 1K of user memory so that 
very long programs which only use Mode 
7 on the BBC micro might actually be 
too long to run on the Electron (since 
the most economical mode on _ the 
Electron is Mode 6 taking 8K). 


Most programs will not fall into 
this category however. The other major 
differences with Mode 7 are its ability 
to display all 8 colours as well as 
flashing and double height text; and 
its different screen format (48 lines 
of 25 characters) - Mode 6 for example 
is 46 by 32. 


In practice, Mode 7 is used mainly 
for displaying text on the BBC micro - 
such as program instructions, games 
high scores etc. Fortunately, Mode 7 
text is usually readable on a Mode 6 
screen, and moreover the instruction 
"MODE 7" is read by the Electron as 
"MODE 6", so that a BBC micro program 
that uses Mode 7 to display 
instructions will run on an Electron 
(providing it is not dumped as raw code 
to the screen area). But you will 
usually need to clean up the display 
somewhat. 


Perhaps the best way to do this is 
to run the program, am take a good 
look at the screen. If text appears to 
be repeated on a pair of consecutive 
lines it probably means that the double 
height facility is in use. For example, 
the following lines will produce the 
word ELECTRON once only in double 
height on a BBC micro. It would print 
twice on an Electron. 


18 MODE 7 
28 PRINT CHRS$141;"ELECTRON" 
38 PRINT CHRS$141;"ELBCTRON" 


To make this print the word once 
only on an Electron, delete line 34. 
The CHRS$141 in line 20 should also be 
removed. Character 141 is the Mode 7 
code for double height. 


Mode 7 uses codes for a variety of 
purposes, and although these may have 
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no effect in Mode 6, they can sometimes 
cause spurious characters to appear on 
the screen. You may also need to remov 
strings of lower case letters and other 
symbols from PRINT statements. For 
example the line 
10 PRINT CHRS145;"f£f£ff££FELLLELLE" 

will print a neat grid across the 
screen in red in Mode 7. The CHRS$145 in 
tells the computer to print 
letters following it as red 
jraphics characters. In other modes 
CHRS$ is interpreted differently, and 
the letters are printed as they appear 
in the program - as a row of f's. On an 
Electron in Mode 6, you will just get a 
row of lower case '‘'f's in white - 
possibly preceded by an odd shape if 
character 145 happens to be defined in 
your machine at the time. The simple 
answer is to delete the whole line. 


e 


rtain 


shots with this article 
demonstrate the problem clearly. 
first is of the header of a BEEBUG 
painting program. The logo uses Mode 
graphics, and the words PAINT BOX are 
in double height. The same program run 
on an Electron produces a quite 
unrecognizable mess - note the double 
printing of the words PAINT BOX. 
Generally speaking the best approach is 
to redesign such pages using the 
facilities of other modes. Fortunately 
it is usually only the graphics of Mode 
7 which become unreadable in other 
modes. The text, and this is usually 
the most important part, is generally 
legible, and will appear at more or 
less same point on the screen as in 
Mode 7. 


The screen 


The 


the 


It is possible to recreate most of 


the effects available in Mode 7 in 
modes which will run on the Electron, 
but there is no simple rule of thumb. 
You will need to use = graphics 


characters that you define yourself to 
replace the many pre-defined graphics 
characters of Mode 7, am to use the 
COLOUR statement to reproduce the Mode 
7 colours. 


You cannot reproduce Mode 7 too 
closely however, since the only full 
colour mode on the Electron is Mode 2 
and this only allows 20 characters of 
text per line. For this reason the best 
mode to replace Mode 7 will be either 
1, 4 or 6. The disadvantage with 4 and 
6 is that only two colours are allowed. 
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Moje 1 gives you 4 colours 

characters per line, but it also 
up 20K of memory compared to the 
miserly 1K of Mode 7. This will not 
cause problems as long as your program 
is shorter than 8.5K. Otherwise you 
will get a 'Bad mode" error message. 


Next month we shall look at other 
problems of program conversion such as 


the use of Sound and Envelope commands. € 
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in Mode 7. 


BEEBUG Logo 


Logo in Mode 6. 


3 


BEEBUC 


BEEBUG Logo dumped 


to Mode 6 Screen. 
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MORE NEW BOOKS FOR ELECTRON USERS 


reviewed by Mike Williams 


This month we look at two more books on programming for Electron 


users. 
Book : The Electron Programmer 
Authors : S.M.Gee and Mike James 


Publisher: Granada 
Price : £5.95 
ISBN @-246-12349-@ 


This book is intended for the 
newcomer to programming in Basic. It 
provides a comprehensive coverage of 
Basic on the Electron and there is some 
emphasis, particularly in the 
introduction, on the need to write well 
structured and readable programs. The 
book does its job in a sound if rather 
unexciting way. The various chapters 
cover progressively, the basic features 


of the language, control statements 
(GOTO, IF-THEN, REPEAT-UNTIL, 
FOR-NEXT), procedures and functions, 


text, integers, arrays, so called ‘low 
resolution' graphics (using PRINT TAB), 
sound, and high resolution graphics 
(MOVE, DRAW, PLOT etc). 


Each chapter follows the same 
pattern, a fairly systematic 
description and definition of each new 
language feature followed by a few, 
often mathematical, examples. This 
makes for very solid reading. I am not 
too happy about the preponderance of 
mathematical programs. Character 
strings and particularly graphics can 
be used from an early stage to provide 
much more interesting examples. After 
all, it is for their excellent graphics 
capabilities that many home users are 
attracted to buy their micro in the 
first place. On aé= slightly more 
academic point, it is a pity that the 
authors have not adopted the standard 
notation for thir definitions of 
syntax, but have felt obliged to 
introduce their own. 


Although this book certainly does 
place some emphasis on programming 
style and structure, it is a pity that 
this approach is not used from the 
start. Likewise, with statements such 
as IF-THEN, less structured versions 
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are introduced first with better 
structured versions and examples 
following later. 

Overall, this book provides a_ sound 


description of Basic programming on the 
Electron. More diagrams and a less 
formal style would have made the book 
much more enjoyable reading. After all, 
programming the Electron for the home 
user can and should be fun! 


Book :Basic Programming on the 
Acorn Electron 
Authors :Neil Cryer and Pat Cryer 


Publisher:Prentice Hall International 
Price 7£6.95 
ISBN @-13-866259-3 


This is another book on Basic 
programming for the beginner and with 
just over 308 pages is positively 
packed with ideas and information, 
sufficient to keep the new Electron 
user busy for quite some time. The book 
contains many example programs and 
screen displays to illustrate the 
techniques described, and to provide a 
storehouse of routines to interest and 
entertain the user. 


The book starts with a useful 
description of the Electron, its 
keyboard and its operation. It is very 
pleasing to see the idea of the 
procedure being introduced at a very 
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early stage in the book (in the second 
chapter) and procedures form the basis 
of the majority of the examples 
throughout the book. 


There is a useful chapter on saving 
and loading programs on cassette 
followed by basic programming 
information. The chapters progressively 
describe all the structured features of 
Electron Basic including REPEAT-UNTIL 
and IF-THEN-ELSE. There is no mention 
of GOTO or any of the unstructured 
forms of IF-THEN until very late in the 
book, which does avoid introducing the 
user to any bad programming habits. 
There is detailed coverage of all 
aspects of sound and graphics on the 
Electron, including animation 
techniques and user-defined characters. 


One point of criticism is the 
quality of presentation and 
reproduction. The text appears to have 


been printed directly from computer 
generated material on a daisywheel 
printer with rather variable quality. 


NNGHHNDNNODWYW 


The program listings are in at least 


three different type faces including 
dot matrix printer listings and two 
styles of daisywheel printer listings. 


This has the unfortunate result that 
the figure zero is sometimes printed as 
‘O' and sometimes as '@'. Consistency 
of presentation is desirable, while it 
would have improved the general 
appearance of the book if the text had 
been typeset. 


One further point is that example 
programs and screen displays are quite 
often allowed to break up the main flow 
of the text and on several occasions I 
was not sure where to continue reading. 


I liked both the content and the 
style of presentation of this book, and 
with so much packed into its 3086 plus 
pages it really is good value at the 


price. It also has the rare merit with 
regard to structured programming of 
practicing what it preaches from 


beginning to end. 


THE BEST OF ELBUG 


Many of the best programs published in ELBUG have been collected together and 


published by Penguin Books under the name "Games and other programs for 
at £3.95. This book is part of the Penguin Acorn Computer Library and at 


Electron" 


present there is just one other title available though others are planned. 


There are 28 programs in all in four different categories: 


Action Games 
Munch-Man Mars Lander Invasion 
Robot Attack Hedgehog 

Thought games 
Higher/Lower Five-Dice Life 
Anagrams Return of the Diamond 


Visual Displays 


Union Jack Square Dance Ellipto 

Screenplay 3-D Rotation 
Utilities 

Sound Wizard Bad Program Lister 


3-D Lettering 
Double Height 


Bad Program Rescue 
Text 


| SeiRit ar | ena e 


the Acorn 


All 2@ programs are now available on cassette from our software address (in High 


Wycombe) 
either case. 


price £7 to members and £9 to non-members, plus 5@p post & packing in 
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BLOCK BLITZ 


by D. J. Pilling 


The following program is one of the most entertaining games we have 


seen, and will well repay the effort spent in typing it 
graphics and sound to produce a fast and 
action game that compares very favourably with the 


micro. It uses colour, 


original 


into your 


commercial games currently available. 


In this game, you are trapped ina 
series of caverns, from which you have 
to escape whilst being bombarded by 
blocks, dropped from above by a very 
mobile crane. As the blocks fall 
towards you, you must try to dodge them 
if you want to stay alive, but your 
only way of making good your escape is 
to climb onto the blocks, and up to the 
height of the walls. The crane is 
quite intelligent, and will try and 
drop the blocks on you, giving you the 
chance to practice some risky 
brinkmanship as you lure the blocks 
into the places that will best help you 
make your exit. If you succeed, a 
gantry extends from one of the walls, 
allowing you to escape. You are then 
thrown into an even deeper cavern! 


You move the man using the left and 
right cursor keys, am he will also 
climb over any blocks in the way, 
provided he doesn't have to step up or 
down more than one block at a time. You 
will need to be very alert to avoid 
being trapped on a column, or between 
two high walls of blocks. A 
demonstration version of the game is 
also included as part of the program 
which shows how easy it all is! 


16 REM PROGRAM BLOCK BLITZ 
20 REM VERSION E@.1 
3@ REM AUTHOR D.J.PILLING 


48 REM ELBUG MARCH 1984 
58 REM PROGRAM SUBJECT TO COPYRIGHT 
66 : 


78 ON ERROR GOTO 250 

80 DIM S%(19,31) ,MANS$(5,1) 
98 PROCchar 

106 REPEAT 

118 MODE 4 

126 PROCsetupuser 

136 MODES 

146 PROCsetup 
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15@ REPEAT 

166 PROCscreen 

176 REPEAT 

186 PROCb1:PROCm 

198 UNTIL end% 

266 PROCgame 

216 UNTIL demo% 

220 UNTIL FALSE 

238 END 

246 : 

258 ON ERROR OFF:MODE 6 

2608 IF ERR<>17 THEN REPORT: PRINT" at 
line ";ERL 

278 END 

280 : 

298 DEF PROCchar 

308 aS=CHRS$8 :bS$=CHRS$16:c$=CHR$11 

318 GS=CHRS$17:eS=CHRS$32 

326 £S=STRINGS (14,CHRS$32) :gS=STRINGS ( 
5,CHRS$32) 

338 VDU23,224,28,48,62,28,28,60,126,1 
89 

348 VDU23,225,189,60,24,24,56,104,200 
176 ‘ 

358 VDU23,226,189,69,24,24,28,23,18,24 

368 VDU23,227,189,66,24,24,28,23,18,48 

378 VDU23,228,189,60,24,24,56,1084, 208 
788 

388 VDU23,229,28,6,62,29,28,60,126,189 

398 VDU23,240,60,90,126,66, 36,126,255 
1189 
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406 VDU23,243,255,129,255,129,66, 36,2 
4,255 

4180 VDU23,244,6,127,127,127,127,127,1 
27,8 

428 VDU23,245, 255,255, 255, 255,255,255 
7255,255 

436 VDU23,246,9,126,126,126,126,126,1 
26,8 

440 VDU23,247,0,231,231,231,231,231,2 
31,6 

458 VDU23,248,189, 189,60, 36, 36, 36, 36, 
162 

460 VDU23,249,119, 34,34,127,127,65,65 
199 

470 VDU23,250,189,219,255, 189,165,255 
255,68 

488 VDU23,251,60,60, 60, 36, 36, 36, 36, 182 

496 ENVELOPE1,3,9,2,0,0,255,0,127,8,@ 
7-127,88,86 

560 RS=dS+CHR$1 : Y$=d$+CHRS$2 

518 WS=d$+CHR$3 

520 MS=WS+CHRS240+bS$+a$+RS$+CHRS$248 

530 MIS=b$+e$+a$+c$+RS$+CHR$251 +a$t+c$+ 
WS+CHRS$259 

540 MKS=c$+e$+b$+a$+W$+CHRS$24G+a$+b$+ 
RS+CHRS$248 

550 £$=eS+WS+CHRS224+b$+a$+ta$t+e$+R$ 

568 MANS (1,8) =£$+CHR$225 

576 MANS (1,1)=£S$+CHRS$226 

588 f£S=eS+a$+aS+WS+CHRS$229+bS+eS+a$+a 
S+R$ 

590 MANS (@,@) =£$+CHRS227 

608 MANS (@,1) =£$+CHRS$228 

610 £$=bSt+e$+c$+a$+eS+R$ :g$=a$+cS$+w$+ 
CHRS$224 

620 MANS (3,8) =£$+CHRS$225+g$ 

639 MANS (3,1) =£S+CHRS$226+g$ 

649 £$=eS+a$+b$+eS+WS$+CHRS$224+a$+b$+R$ 

650 MANS (5,8) =£S+CHR$225 

666 MANS (5,1) =£S+CHRS$226 

678 £$=bS+eS+c$+a$+e$+a$+a$+R$ :g$=a$+ 
cS+WS+CHRS$229 

680 MANS (2,0) =£S+CHRS$227+g$ 

698 MANS (2,1) =£S+CHR$228+g$ 

706 £$=eS+a$+b$+e$+a$+a$+WS+CHR$229+a 
$+b$+R$ 

7106 MANS (4,9) =£S+CHR$227 
MANS (4,1) =£$+CHR$228 
BS=RS$+CHRS$249+a$+b$+Y$+CHR$244 
TLS=e$+a$+a$+R$+CHR$249 
TRS=e$+RS+CHRS$249 
BLS=TLS$+a$+b$+Y$+CHRS$244+eS$ 
BRS=TRS+a$+a$+b$+e$+YS$+CHR$244 
BDS=Y$+e$+a$+b$+CHRS$244 
WALLS=CHRS$246+CHRS$246+cS$+a$+a$+CH 
R$247+CHR$247+cS+a$+a$ 

808 HI$=6:SC%=0 

818 ENDPROC 

826 : 

830 DEF PROCsetup 


846 
858 
866 
878 
880 
898 
988 


VDU23, 1; 0; 8; G9; 9: VDU29, 640; 512; 
IF HI$<SC% THEN HI$=SC% 

H$=4: NS=1 :M$=G:MEN3=3 
SC%=FNsc (H%) : SCT$=@ 

ENDPROC 


DEF PROCscreen 

918 CLS:COLOURI1 

920 PRINTTAB(G,@)"H ";HI%$;TAB(9);"S " 
7SC%;TAB(17)"M ";MEN% 

938 COLOUR2 

948 gS=STRINGS (2,CHR$243) 

950 PRINTTAB(G,1)STRINGS(18,g$); 

969 PRINTTAB(G,6)g$ TAB(18,6)9$; 

978 PRINTTAB(9,29-H%)g$ TAB(18,29-H$%) 
g$; 
986 COLOUR2: PRINTTAB (9, 38) STRINGS (26, 
CHRS$245) ; 

998 PRINTTAB (@, 30) STRINGS (20,CHRS$245) ; 

1888 COLOUR131:COLOUR1 

1818 gS=STRINGS (H%/2,WALLS) 

1620 PRINTTAB(@,29)g$; 

1038 PRINTTAB(18,29)g$; 

1848 COLOUR128 

1858 FOR J%=8 TO 31 

1666 FOR I%=8 TO 19 

1076 IF J$=30 THEN S%(I%$,J%)=2 ELSE S% 
(1%,J%) =8 

1688 NEXT I%,J% 

1998 B$=28:A$=1 G9: NG$=FALSE: end$=FALSE 

1168 PRINTTAB(A%,B%) MS 

1119 Y%=3:IF RND(2)=1 THEN X%=@ ELSE 
X3=19 

1126 ENDPROC 

1138 : 

1148 DEF PROCm 

1156 IF M%=@ THEN M%=1 ELSE M%=@ 

1168 IF S%(A%,B%)<>@ THEN PROCng:ENDPR 
oc 

1170 IF demo% THEN 1200 

1186 IF INKEY-26 THEN IF A%>2 THEN 1280 

1196 IF INKEY-122 THEN IF A%<17 THEN 1 
239 


33 
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1200 IF NOT demo% THEN PRINTTAB(A$%,B%) 
MS; : ENDPROC 

1210 IF Y%<=3 OR X%<>A% THEN PRINTTAB( 
A%,B%) MS; : ENDPROC 

1220 IF A%=10 THEN 1280 

1230 IF S%(A%+1,B%)<>@ THEN ENDPROC 

1240 IF S%(A%+1,B$+1)=2 THEN PRINTTAB( 
A%,B%) MANS (3,M%) :A$=A$+1 :B%=B$-1:GOTO 1 
326 

1256 IF S%(A%+1,B%+2)=2 THEN PRINTTAB( 
A%,B%) MANS (1,M%) :AS=A$+1:GOTO 1320 

1266 IF S%(A%+1,B%+3)=2 THEN PRINTTAB( 
A%,B%) MANS (5,M%) :A$=A$+1 :B3=B$+1:GOTO 1 
320 

1278 ENDPROC 

1280 IF S%(A%-1,B%)<>@ THEN ENDPROC 

1296 IF S%(A%-1,B%+1)=2 THEN PRINTTAB( 
A%,B%) MANS (2,M%) :A$=A$-1 :B$=B$-1:GOTO 1 
320 

1300 IF S%(A%-1,B%+2)=2 THEN PRINTTAB( 
A%,B%) MANS (@,M%) :AS=A%$-1:GOTO 1326 

1310 IF S%(A%-1,B%+3)=2 THEN PRINTTAB( 
A%,B%) MANS (4,M%) :AS=A%-1 :BS=BS+1 

1326 IF S%(A%,B%)<>@ THEN PROCng:ENDPR 
oc 

1338 IF B%=27-H$ THEN PROCwin:ENDPROC 

1348 ENDPROC 

1356 : 

1366 DEF PROCng 

1378 end%=TRUE: NG$=TRUE: MENS=MEN$-1 

1388 SOUND&G911,0,8,0:SOUNDG,-15,5,12 

1398 PROCbonk 

1488 ENDPROC 

1416 : 

1428 DEF PROCd(T%) 

1438 TS=TIME+TS 

1448 REPEAT UNTIL TIME>TS 

1458 ENDPROC 

1468 : 

1470 DEF PROCwin 

1480 IF S%(X%,Y%)=1 THEN PRINTTAB(X%,Y 
%) eS; : SOUND&0011,9,8,@ 

1499 PRINTTAB (A%,B%) MS; 

1586 end$=TRUE:COLOUR2 

1519 IF A%=2 OR A%=17 THEN 1549 

1528 D$=A% 

1538 IF A%<9 THEN FOR C%=2 TO A%-1:PRI 
NTTAB (C$,B%+2) CHR$243:SOUND2,-18,196,1: 
PROCd (15) :NEXT ELSE FOR C%=17 TO A$+1 S 
TEP-1 : PRINTTAB (C$,B$+2) CHRS243:SOUND2,- 
10,166,1:PROCd(15) :NEXT 

1548 REPEAT IFA%$<9 PRINTTAB(A%,B%) MANS 
(@,M%) : PROCd (15) :AS=A3-1 ELSE PRINTTAB( 
A%,B%) MANS (1,M%) : PROCd(15) :AS=A$+1 

1558 IFM%=@ THEN M%=1 ELSE M%=@ 

1568 UNTIL AS=1 OR A$=18 

157@ IF D%=2 OR D$=17 THEN 1630 

1586 COLOUR2: PRINTTAB (A%,B%) MS; 

1598 IF D&%<9 THEN FOR C%=D%-1 TO 2 STE 
P-1: PRINTTAB (C%,B%+2) eS: SOUND2,-10, 190, 


1:PROCd (15) :NEXT ELSE FOR C%=D%+1 TO 17 
: PRINTTAB (C$,B%+2) e$: SOUND2,-19,180,1:P 
ROCd (15) :NEXT 

1688 COLOURG:COLOUR] 31 

1616 IF A%=1 PRINTTAB(3,B%-1) "YIPPEE"” 
ELSE PRINTTAB(11,B%$-1) "YIPPEE" 

1628 COLOUR128 

1638 FOR I%$=1 TO 19:PRINTTAB(A%,B%)MJ$ 
;:SOUND@,-15,4,1:PROCd (8) : PRINTTAB (A$,B 
%) MKS; : SOUNDG,-15,6, 1: PROC (8) :NEXT 
1649 IF A$=1 PRINTTAB(3,B%-1)SPC(6) EL 
SE PRINTTAB(11,B%-1) SPC (6) 

1659 PROCd (158) 

1668 ENDPROC 

1676 : 

1688 DEF PROCb1 

1696 IF Y%=3 THEN 1800 

1708 IF T$>9 THEN 1720 

1716 IF T$>@ PRINTTAB (TS, 2) TLS: TS=TS-1 
:GOTO 1736 ELSE PRINTTAB(@,2)e$:GOTO 17 
38 

1726 IF TS<19 PRINTTAB(TS$,2) TRS: TS=TS+ 
1 ELSE PRINTTAB(19,2)e$ 

1738 PRINTTAB (X%,Y%) BD$:S% (X%,Y$) =O: Y$ 
=Y3+1:S% (X%,Y%) =1: IF S%(X%,Y$+1)<>2 THE 
N ENDPROC 

1748 S%(X3,Y%)=2 

1758 SOUND&G811,6,8,8:SOUNDG,-15,4,1 
1760 IF T$<>@ AND TS<>19 Y3=Y3-1:ENDPR 
oc 

1778 IF RND(1)>.5 THEN X%=19 ELSE X%=@ 
1788 SC%=SC$-19: PRINTTAB(11,@)SPC(5)TA 
B(11,8)R$;SC% 

1798 Y%=3: PRINTTAB (X%, 2) BS; : ENDPROC 
1888 SOUND2,-10,68,1 

1810 IF (A%=X% AND RND(1)>.5) THEN 1868 
1826 IF demo% THEN 1846 

1838 IF ABS(A%-X%)<2 THEN IF RND(1)>.8 
THEN 1866 

1840 IF A$<X% THEN PRINTTAB(X$%,2) BLS:X 
$=X$-1 ELSE PRINTTAB (X%, 2) BR$:X%=X3+1 
1858 ENDPROC 

1866 IF X%<2 OR X%>17 ENDPROC 

1878 T%=X%:SOUND1,1,3508,98:GOTO1 730 
1880 : 

1898 DEF PROCgame 

1998 IF NG% AND MEN%=@ THEN PROClost:P 
ROCsetup:ENDPROC ELSE IF NG% THEN PROCc 
ng : ENDPROC 

1918 N=N$+1 sHS=HS+2 

192@ IF H=18 THEN PROCover: PROCsetup: 
ENDPROC 

1938 PROCccg 

1949 ENDPROC 

1956 : 

1966 DEF FNsc(H%) =160* (H&+1) 

1976 : 

1980 DEF PROCr:REPEAT UNTIL INKEY-74:E 
NDPROC 


1998 : » 
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2006 DEF PROCsetupuser 

2016 VDU19,1,3;0;19,6,4;9; 

2020 PRINTTAB(1G,3)"B LOCK BLIT 

Ze 

2630 PRINTTAB (10,4) STRINGS (20,"=") 

2048 PRINTTAB(G,7)" You have been imp 
risoned by the evil"'" Dr. X in an ever 
deeper series of"'" caverns. To add to 

your problems, they"'" are being fille 
d in with blocks aimed"'" at you!" 

2050 PRINT''" However if you can reac 
h the level of"'" the brick sides by st 
anding on the"'" blocks you can escape 
from each cavern"'" and eventually from 
all of them." 

2666 PRINT''" You move by using the 1 
eft and right"'" cursor keys but you ca 
n only leap up"'" and down one block at 
a time." 

2078 *FX15,@ 

2080 PRINT''" 
J) "5 

2698 IKS=GETS$:IF IKS="Y" THEN demo%=TR 
UE ELSE IF IKS="N" THEN demo%$=FALSE ELS 
E GOTO 2696 

2106 ENDPROC 

2118 : 

212@ DEF PROCcng 

2138 SC%=SCT%$:CLS:COLOUR2 

2140 PRINTTAB(4,5)"OH DEAR !"TAB(4,7)" 
YOU LOST" TAB(4,9)"A MAN" 

215@ PROCsctab: SC$=SC%+FNsc (H3) 

2168 ENDPROC 

2170 : 

2186 DEF PROCceg 

2196 SCT%=SC%:CLS :COLOUR2 

2206 PRINTTAB (2,5) "NEXT -->"TAB(2,8)"C 
AVERN NUMBER ";N% 

2218 PROCsctab:SC%=SC$+FNsc (H%) 

2220 ENDPROC 

2230 : 


Do you want a demo ? (Y 


i «even 


requires skill and 


fast 


complete the first screen 
concentration. 


2248 DEF PROCsctab 

2258 VDU19,1,6,9,0,0 

2268 COLOURI 

2270 PRINTTAB (4,14) "MEN.......";7MEN3 

2280 PRINTTAB (4,16) "SCORE.....";SC% 
2296 PRINTTAB (4,18) "HISCORE...";HI% 
2306 COLOUR2: PRINTTAB(1,28)"RETURN TO 
CONT INUE" 

2310 PRINTTAB(1,28)"RETURN TO CONTINUE" 

2320 PROCr:VDUI9,1,1,0,0,¢ 

2338 ENDPROC 

2348 : 

2358 DEF PROCover 

2368 CLS:COLOUR2 

2378 SC%=SC$+MEN$*ENSc (18) 

2380 PRINTTAB (2,3) "CONGRATULATIONS" TAB 
(2,6)"YOU HAVE ESCAPED"TAB(2,8) "FROM AL 
L THE"TAB(2,10)"THE CAVERNS" 

2398 PROCsctab 

2488 ENDPROC 

2418 : 

2420 DEF PROClost 

2430 CLS:COLOUR2: SC%=SCTS% 

2446 PRINTTAB(4,4) "GAME OVER"TAB (4,6) " 
YOU RAN OUT"TAB(4,8)"OF MEN" 

2458 PROCsctab 

2468 ENDPROC 

2478 : 

24806 DEF PROCbonk 

2496 CLS 

2506 FOR X%=150 TO 560 STEP 5@:GCOLG,1 
:MOVE X%,X%:DRAW X%$,-X%:DRAW -X$,-X3:DR 
AW -X%,X%:DRAW X%,X%:X$=X3+5G:GCOLG, 2:M 
OVE X%$,X%:DRAW X%,-X%:DRAW -X%,-X%: DRAW 

-X%,X%:DRAW X%,X%:NEXT 

2510 COLOUR3: PRINTTAB(6,15)"B ON KI" 

2520 FOR I%=1 TO 8:VDUI9,1,3,6,0,0,19, 
2,1, @,G,@:PROCd (8) :VDUI9,1,1,9,0,6,19, 
2,3,@ ,G,G:PROCd(8) :NEXT 

2538 ENDPROC 


riiiel 


is a very addictive, 


is much more exciting 
similar ne 


> be surg 


Further frames ne 
playing areas, ll as adding 
variety, require much greater skill 
complete 


Snake costs £4.80 inc 


T. Please add SUp post & packing. 


Overseas orders: £5.5¥ inc post & packing - VAT not charged. 


Send order with membership nunber 
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IF YOU WRITE TO US 


BACK ISSUES (Members only) 

issues will be kept in print 
(from November 1983). Send 9@p per 
issue PLUS an AS SAE to the 
subscriptions address. Back copies of 
BEEBUG are available to ORBIT members 
at this same price. This offer is for 
members only, so it is ESSENTIAL to 
quote your membership number with your, 
order. Please note that the advertising 
supplements are not supplied with back 
issues. 


Subscription and Software Address 
ELBUG 
PO BOX 189 
High Wycombe 
Bucks 


All back 


MAGAZINE CONTRIBUTIONS 


AND TECHNICAL QUERIES 


Please send all contributions and 
technical queries to the editorial 
address opposite. All contributions 
published in the magazine will be paid 
for at the rate of £25 per page. 


We will also pay £10 for the best Hint 
or Tip that we publish, and £5 to the 
next best. Please send all editorial 


material to the editorial address 
opposite. If you require a reply it is 
essential to quote your membership 
number and enclose an SAE. 


SUBSCRIPTIONS 


Send all applications for membership, 
and subscription queries to the 
subscriptions address. 


MEMBERSHIP COSTS: 
£5.98 for 6 months (5 issues) 
£9.98 for 1 year (18 issues) 
European Membership £16 for 1 year. 
Elsewhere (Postal zones) 
Zone A £19, Zone B £21, Zone C £23 


SOFTWARE (Members only) 


This is available from the software 
address. 
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